sana basit bi şekilde örnek yapayım
<%
adr="http://www.site.com/xmldosyasi.xml"
set StrHTTP = Server.CreateObject("Microsoft.XMLHTTP")
StrHTTP.Open "GET" ,adr, false
StrHTTP.Send
kur = StrHTTP.Responsetext
Set StrHTTP = Nothing


kes = split(kur,"<stokkodu>")
kes2=split(kes(1),"</stokkodu>")
link=kes2(0)

response.write "staok Kodu:"& link &""
%>