YouTube API get the Video Tags - vb.net

I am trying to get the "tags" and I am having a hard time doing it.
This is the last item that I have to do, to complete this part of the project.

JSON Sample
{
 "items": [
  {
   "id": "tyGHrfDGTR",
   "snippet": {
    "title": "This is the title",
    "tags": [
     "one",
     "two",
     "three",
     "four",
     "five"
    ]
   }
  }
 ]
}

Open in new window


VB.NET Code

Class VidList
    Public Property Items() As List(Of VidItem)
End Class

Class VidItem
    Public Property Id() As String
    Public Property Snippet() As VidSnippet
End Class

Class VidSnippet
    Public Property Title() As String
    Public Property Description() As String
    Public Property tags() As String
End Class

For Each [item] In playList.Items
            Response.Write(item.Snippet.tags)
next

Open in new window


(Above code assisted by -saige- )

With the [] and nothing after it, I am lost on how to get the tags values returned back.

Thanks
Carrzkiss
LVL 31
Wayne BarronAuthor, Web DeveloperAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

it_saigeDeveloperCommented:
Your tags property should be a list of string or a string array; e.g. -
Public Property tags() As List(Of String)
' OR
Public Property tags() As String()

Open in new window

Proof of concept -
Module Module1
    Const json = "{" _
& """items"": [" _
& "{""id"" : ""tyGHrfDGTR"", " _
& """snippet"": {""title"": ""This is the title"", " _
& """tags"": [""one"", ""two"", ""three"", ""four"", ""five""]}}]}"

    Sub Main()
        Dim videoList = Newtonsoft.Json.JsonConvert.DeserializeObject(Of VideoList)(json)
        Console.WriteLine("Items: ")
        For Each videoItem In videoList.Items
            Console.WriteLine(vbTab & "ID: " & videoItem.ID)
            Console.WriteLine(vbTab & "Snippet:")
            Console.WriteLine(vbTab & vbTab & "Title: " & videoItem.Snippet.Title)
            Console.WriteLine(vbTab & vbTab & "Description: " & videoItem.Snippet.Description)
            Console.WriteLine(vbTab & vbTab & "Tags:")
            For Each tag In videoItem.Snippet.Tags
                Console.WriteLine(vbTab & vbTab & vbTab & tag)
            Next
        Next
        Console.ReadLine()
    End Sub
End Module

Class VideoList
    Public Property Items() As List(Of VideoItem)
End Class

Class VideoItem
    Public Property ID() As String
    Public Property Snippet() As VideoSnippet
End Class

Class VideoSnippet
    Public Property Title() As String
    Public Property Description() As String
    Public Property Tags() As List(Of String)
End Class

Open in new window

Produces the following output -Capture.PNG
-saige-
0
Wayne BarronAuthor, Web DeveloperAuthor Commented:
Hey, -saige-
Hum, that is going to be difficult to add to a database.
Unless I insert everything into the table and then come back and make another request and then update the database, add in these tags.
Unless you can think of a better way.
Also.
I found out that we are limited to 1 million requests per day.
Would this "Loop" count for 1 request, or 5 requests in this example?
0
it_saigeDeveloperCommented:
I would imagine that it is one request as you get your data back as one request result.  As for the db, you could insert the tags as a comma-delimited list (athough with the cost of disk space being so long and the request size being so small, I don't understand why you have to use one insert), unless of course, you are limited on your input requests.

As for constructing the comma-delimited list:
Module Module1
    Const json = "{" _
& """items"": [" _
& "{""id"" : ""tyGHrfDGTR"", " _
& """snippet"": {""title"": ""This is the title"", " _
& """tags"": [""one"", ""two"", ""three"", ""four"", ""five""]}}]}"

    Sub Main()
        Dim videoList = Newtonsoft.Json.JsonConvert.DeserializeObject(Of VideoList)(json)
        Console.WriteLine("Items: ")
        For Each videoItem In videoList.Items
            Console.WriteLine(vbTab & "ID: " & videoItem.ID)
            Console.WriteLine(vbTab & "Snippet:")
            Console.WriteLine(vbTab & vbTab & "Title: " & videoItem.Snippet.Title)
            Console.WriteLine(vbTab & vbTab & "Description: " & videoItem.Snippet.Description)
            Console.WriteLine(vbTab & vbTab & "Tags: " & String.Join(",", videoItem.Snippet.Tags))
        Next
        Console.ReadLine()
    End Sub
End Module

Class VideoList
    Public Property Items() As List(Of VideoItem)
End Class

Class VideoItem
    Public Property ID() As String
    Public Property Snippet() As VideoSnippet
End Class

Class VideoSnippet
    Public Property Title() As String
    Public Property Description() As String
    Public Property Tags() As List(Of String)
End Class

Open in new window

Now produces the following output -Capture.PNGBe aware, however, of size limitations imposed on varchar(MAX) and that if your string elements contain comma's this will be split when you try to parse the field into it's separate elements.

-saige-
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
Cloud Class® Course: CompTIA Cloud+

The CompTIA Cloud+ Basic training course will teach you about cloud concepts and models, data storage, networking, and network infrastructure.

Wayne BarronAuthor, Web DeveloperAuthor Commented:
The comma-delimited list will work perfectly.

What do you mean by this?
>> I don't understand why you have to use one insert
0
it_saigeDeveloperCommented:
Just an off hand question.  In general, most db inserts insert separate records into separate rows rather than trying to insert everything at once.  You can always use transactions if you want to ensure that the entire record set gets added but trying to jam everything here into a single row (your original playlist included) just muddy's up the water.

-saige-
0
Wayne BarronAuthor, Web DeveloperAuthor Commented:
OK.
I have 3 tables.
Users
List
Videos

The Tags
They are inserted into the Videos [Tags] Column.
0
Wayne BarronAuthor, Web DeveloperAuthor Commented:
Thanks again, -saige-
I am slowly but surely learning how to use this the way I need it.

Have a rockin rest of the week.
Wayne
0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
ASP.NET

From novice to tech pro — start learning today.

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.