|
|
|
Lodosta sobaları söndürün |
|
Bursa’da, lodos nedeniyle bacadan sızan karbonmonoksit gazından 45 kişi zehirlendi.
Edinilen bilgiye göre, gece zaman zaman saatteki hızı 50 klimotreye çıkan lodos yine zehirledi. Lodoslu havada sobalarını söndürmeyi ihmal eden 45 vatandaş karbonmonoksit gazından zehirlenerek hastanelere kaldırıldı. Yüksek İhtisas, Muradiye, Çekirge, Şevket Yılmaz devlet hastanelerine kaldırılan 36 kişiden 20’si müşahede altına alınırken, 2’si Tıp Fakültesine sevk edildi, 23 hastanın tedavileri ayakta yapıldı. (cihan)
|
|
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%>
|
