1. 101.
    0
    upupup
    <% public function verial(strgelen) set objverial = server.createobject("microsoft.xmlhttp" ) objverial.open "get" , strgelen, false objverial.send verial = objverial.responsetext set objverial = nothing end function stradres = " http://www.tcmb.gov.tr/kurlar/today.html" ; strveri = verial(stradres) idolar=instr(strveri,"usd" ) strdolaralis=mid(strveri,idolar+50,10) strdolarsatis=mid(strveri,idolar+51,10) ieuro=instr(strveri,"eur" ) streuroalis=mid(strveri,ieuro+38,11) 'alis streurosatis=mid(strveri,ieuro+50,11) 'satis %>
    bunu kaldırın panpa bu ne amk
    ···
   tümünü göster