<%@LANGUAGE="VBSCRIPT" CODEPAGE="1254"%> ASP ile Twitter'dan veri çekmek <% 'XML verilerini okumak için XMLDOM nesnemizi oluşturuyoruz Set objXML = Server.CreateObject("Microsoft.XMLDOM") objXML.async = false objXML.setProperty "ServerHTTPRequest", true %>
  (twitter isminizi yazarak kontrol edebilirsiniz)
<% 'QueryStringden gelen twitter adını çekiyoruz t = Request.QueryString("t") 'Twitter adı varsa If t <> "" Then xmlFile = "http://twitter.com/statuses/friends/"&t&".xml" objXML.Load xmlFile Set objItems = objXML.getElementsByTagName("user") ArkadasSayisi = Int(objItems.Length) %>

Arkadaş Sayısı: <%=ArkadasSayisi%>

<% If ArkadasSayisi > 0 Then %> <% i = 1 For Each objItem in objItems name = objItem.selectSingleNode("name").Text sname = objItem.selectSingleNode("screen_name").Text resim = objItem.selectSingleNode("profile_image_url").Text twit = objItem.selectSingleNode("statuses_count").Text %> style="background:#eee;"<%End If%>> <% i = i + 1 Next %>
Resim Kişi Twitter Adı Twit Sayısı Twitter Link
<%=name%> <%=name%> <%=sname%> <%=twit%> <%=sname%>
<% End If %> <% End If %>