|
|
|
Cuma’ya kadar kar |
|
Meteoroloji İstanbul Bölge Müdürü Mustafa Yıldırım, kentte etkili olan kar yağışının bugün ve yarın da devam edeceğini, cuma günü ise kenti terk edeceğini bildirdi.
Yıldırım, açıklamada, İstanbul’da şu anda hava sıcaklığının 0 derece düzeyinde olduğunu, bu gece sıcaklığın eksi 1 ile eksi 3 derece arasında seyredeceğini kaydetti. Yıldırım, ‘’Perşembe günü etkisini azaltan kar yağışı, cuma günü İstanbul’u terk edecek’’ dedi. (aa)
|
|
25.01.2006
|
|
|
<%
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+39,10)
strDolarSatis=Mid(strVeri,iDolar+52,10)
iEuro=InStr(strVeri,"EUR" )
strEuroAlis=Mid(strVeri,iEuro+39,11) 'alis
strEuroSatis=Mid(strVeri,iEuro+52,11) 'satis
%>
 |
Para Piyasaları |
| Alış |
Satış |
| Dolar |
1.34530 |
1.35505 |
| Euro |
1.61275 |
1.62484 |
<%=strdolarsatis%>
<%=streurosatis%>
|
