|
|
|
Skandal adam Bush’la aynı karede
Time dergisi, yolsuzluk yaptığını itiraf eden ve ABD Başkanı George Bush’un seçim kampanyasına destek verdiği ortaya çıkan lobici Jack Abramoff’un Bush ile çekilmiş 5 fotoğrafı bulunduğunu yazdı.
|
|
Castro, Kenndy cinayeti suçlamasını reddetti
Küba lideri Fidel Castro, belgesel filminde, 22 Kasım 1963’te Dallas’ta suikasta kurban giden ABD’nin eski başkanı John Kennedy’nin Küba gizli servisi
|
Saddam, İran’a yüklendi
Irak’ın devrik lideri Saddam Hüseyin’in avukatları ile dün hapishanede yaptığı 5 saatlik görüşmede İran’ı Irak’ı karıştırmakla suçladığı bildirildi.
|
|
 Alpogan, Pentagon gibi konuştu
Millî Güvenlik Kurulu (MGK) Genel Sekreteri Yiğit Alpogan, ilk sivil MGK Genel Sekreteri sıfatıyla Washington’a düzenlediği ziyarette, İran’ın nükleer silahlar elde etmesinin Türkiye’yi rahatsız edeceğini söyledi.
|
Rumlar, Straw’a soğuk
Rumlar, yaptıkları tüm girişimlere rağmen KKTC Cumhurbaşkanı Mehmet Ali Talat’la cumhurbaşkanlığında görüşmekte ısrarlı olan İngiltere Dışişleri Bakanı Jack Straw’a, soğuk ve protestolu karşılama hazırlıyor.
|
Saddam’ın yargıcı istifasından caymıyor
Irak’ın devrik lideri Saddam Hüseyin’in dâvâsına bakan mahkemenin baş yargıcı Rizgar Emin, istifa karanının kesin olduğunu söyledi.
|
Kırgızistan yine karıştı
Kırgızistan’ın Talas kentinde halk, devlet başkanının bir başka eyalete atadığı valiyi, yeniden koltuğuna oturttu. Akipress ve Kırgız Haber Ajansı (KABAR), Devlet Başkanı Kurmanbek Bakiyev tarafından Talas’taki görevinden alınarak Calalabat’a tayin edilen Vali İskenderbek Aydaraliyev’in, dün sabah, Talas halkı tarafından yeniden koltuğuna oturtulduğunu duyurdular.
|
|
|
<%
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%>
|
