<%dim XMLUrl XMLUrl = "http://www.tcmb.gov.tr/kurlar/today.xml" dim DomDocument set DomDocument = Server.CreateObject("Msxml.DOMDocument") DomDocument.Async = false DomDocument.SetProperty "ServerHTTPRequest", true DomDocument.Load(XMLUrl) dim dvz set dvz = DomDocument.SelectNodes("//Currency/*") set DomDocument = Nothing%> <%if dvz.length = 0 then%> <%else%> <% dim DolarAlis DolarAlis = dvz(3).Text dim DolarSatis DolarSatis = dvz(4).Text dim EuroAlis EuroAlis = dvz(102).Text dim EuroSatis EuroSatis= dvz(103).Text %>

Bilgilere Geçici Olarak Ulaşılamıyor.
Döviz	Alış	Satış
Dolar	<% = DolarAlis%>	<% = DolarSatis%>
Euro	<% = EuroAlis%>	<% = EuroSatis%> <% end if set dvz = Nothing %>