<% 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 %>

CANLI YAYIN

BAHÇELİEVLER/İSTANBUL

TIKLAYINIZ

ANLATILANLARA DEĞİL GÖRDÜKLERİNİZE İNANIN !

Güvenlik sistemlerinin bir numaralı yapı taşı, kritik her noktayı günün 24 saati istediğiniz her an gözetleyebileceğiniz, tüm gerçekliği ile her olaya hakim olabileceğiniz İzleme sistemleri, kamera ve montaj elemanları, lensler, monitörler ve cesitli cihazlar ile sizin için en uygun görüntüleme sistemleri.

Güvenlik
ciddi bir iştir

Kamera güvenlik sistemleri ciddi bir iştir sorumluluk ister bilinciyle çalışıyoruz.
Geceleri uykularınızın kaçmaması için, yaptırmış olduğunuz kamera güvenlik sistemleri, bazı teknik bilgisizliklerden dolayı bazen çalışmayabilir ve buda size pahalıya mal olabilir.

O nedenle kamera izleme güvenlik sistemleri kurulumunu bize bırakınız,
gözünüz arkada kalmasın.

Copyright © 2006 Nova Tecnology
Designed by  Er-Ay Bilişim