Website XML naar label

[EgbertJan]

Hallo beste mensen,

Enige tijd geleden ben ik begonnen met een programmaatje te schrijven en daar maak ik gebruik van een script (website) dat ik via de web browser functie lees. Het script ziet er als volgt uit:

<?php
$streamData = json_decode(file_get_contents("http://api.justin.tv/api/stream/summary.json?channel=faithlessdbo"),true);

$viewers = $streamData['viewers_count'];

echo $viewers;
?>

Nu is mijn vraag, is dit in te voeren in VB2010? Zo ja, hoe zou ik dit moeten doen dan? Zo nee, hier is nog een XML website die geupdate word op het moment dat ik begin te streamen (het laat zien via deze link hoeveel mensen er op dat moment kijken:

http://api.justin.tv/api/stream/list.xml?channel=faithlessdbo

Aangezien ik momenteel niet stream (waarschijnlijk) zal je de pagina niet zien dus heb ik de XML to gevoegd:

Het gaat om de waarde channel_count dat ik graag wil exporteren naar mijn label (die ik dan via een button kan updaten wanneer ik dit graag zou willen). Hoe zal mijn code er dan uit moeten zien als ik deze waarde exporteer via die url naar een label van mij?

[XML]<streams>
<stream>
<broadcast_part>1</broadcast_part>
<featured>False</featured>
<channel_subscription>False</channel_subscription>
<embed_count>1</embed_count>
<id>5549411296</id>
<category>gaming</category>
<title>
FaithlessDbo - Streaming The Howing Abyss! Come watch now!
</title>
<site_count>0</site_count>
<embed_enabled>True</embed_enabled>
<channel>
<subcategory/>
<producer>False</producer>
<image_url_huge>
http://static-cdn.jtvnw.net/jtv_user_pictures/faithlessdbo-profile_image-e052a1f9d47158bc-600x600.png
</image_url_huge>
<timezone>Europe/Amsterdam</timezone>
<screen_cap_url_huge>
http://static-cdn.jtvnw.net/previews/live_user_faithlessdbo-630x473.jpg.jpg
</screen_cap_url_huge>
<id>5549411296</id>
<views_count>1570</views_count>
<category>gaming</category>
<embed_code>
<object type="application/x-shockwave-flash" data="http://www.justin.tv/widgets/live_embed_player.swf?channel=faithlessdbo" id="live_embed_player_flash" height="400" width="300" bgcolor="#000000"><param name="allowFullScreen" value="true"/><param name="allowScriptAccess" value="always" /><param name="allowNetworking" value="all" /><param name="movie" value="http://www.justin.tv/widgets/live_embed_player.swf" /><param name="flashvars" value="hostname=www.justin.tv&channel=faithlessdbo&auto_play=false&start_volume=25" /></object><a href="http://www.justin.tv/faithlessdbo#r=-rid-&amp;s=em" class="trk" style="padding:2px 0px 4px; display:block; width:345px; font-weight:normal; font-size:10px; text-decoration:underline; text-align:center">Watch live video from faithlessdbo on www.justin.tv</a>
</embed_code>
<title>faithlessdbo</title>
<image_url_tiny>
http://static-cdn.jtvnw.net/jtv_user_pictures/faithlessdbo-profile_image-e052a1f9d47158bc-50x50.png
</image_url_tiny>
<screen_cap_url_large>
http://static-cdn.jtvnw.net/previews/live_user_faithlessdbo-320x240.jpg.jpg
</screen_cap_url_large>
<channel_url>http://www.justin.tv/faithlessdbo</channel_url>
<status>
FaithlessDbo - Streaming The Howing Abyss! Come watch now!
</status>
<meta_game>League of Legends</meta_game>
<tags/>
<image_url_small>
http://static-cdn.jtvnw.net/jtv_user_pictures/faithlessdbo-profile_image-e052a1f9d47158bc-70x70.png
</image_url_small>
<screen_cap_url_medium>
http://static-cdn.jtvnw.net/previews/live_user_faithlessdbo-150x113.jpg.jpg
</screen_cap_url_medium>
<language>en</language>
<embed_enabled>True</embed_enabled>
<subcategory_title/>
<image_url_medium>
http://static-cdn.jtvnw.net/jtv_user_pictures/faithlessdbo-profile_image-e052a1f9d47158bc-150x150.png
</image_url_medium>
<image_url_large>
http://static-cdn.jtvnw.net/jtv_user_pictures/faithlessdbo-profile_image-e052a1f9d47158bc-300x300.png
</image_url_large>
<mature/>
<screen_cap_url_small>
http://static-cdn.jtvnw.net/previews/live_user_faithlessdbo-70x53.jpg
</screen_cap_url_small>
<login>faithlessdbo</login>
<category_title>Gaming</category_title>
</channel>
<up_time>Wed May 1 08:31:46 2013</up_time>
<meta_game>League of Legends</meta_game>
<format>live</format>
<channel_count>0</channel_count>
<stream_type>live</stream_type>
<abuse_reported>False</abuse_reported>
<geo>NL</geo>
<name>live_user_faithlessdbo</name>
<language>en</language>
<stream_count>1</stream_count>
<broadcaster>unknown_rtmp</broadcaster>
<channel_view_count>1570</channel_view_count>
</stream>
</streams>[/XML]

Alvast bedankt!

 

[EgbertJan]

Dom Dom.... Als ik iets beter had gezocht had ik het antwoord al kunnen vinden...

Voor de geïnteresseerde onder ons:

Imports System.Xml


Dim doc As XmlDocument = New XmlDocument()
Dim node As XmlNode


doc.Load("http://api.justin.tv/api/stream/list.xml?channel=faithlessdbo")
node = doc.GetElementsByTagName("channel_count")(0)
Label2.Text = node.InnerText