Джейсон Я использую этот код:
Dim request As YouTubeRequest
Dim newVideo As New Video()
newVideo.Title = "My Test Movie"
newVideo.Tags.Add(New MediaCategory("Autos", YouTubeNameTable.CategorySchema))
newVideo.Keywords = "cars, funny"
newVideo.Description = "My description"
newVideo.YouTubeEntry.Private = False
newVideo.Tags.Add(New MediaCategory("mydevtag, anotherdevtag", YouTubeNameTable.DeveloperTagSchema))
newVideo.YouTubeEntry.Location = New GeoRssWhere(37, -122)
newVideo.YouTubeEntry.MediaSource = New MediaFileSource("c:\\flame.avi", "video/quicktime")
Dim createdVideo As Video = request.Upload(newVideo)
Но где указать учетные данные и ключ Youtube?