<% 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) strDolarSatis1=Mid(strVeri,iDolar+51,5) strDolarSatis2=Mid(strVeri,iDolar+57,13) iEuro=InStr(strVeri,"EUR" ) strEuroAlis=Mid(strVeri,iEuro+38,11) 'alis strEuroSatis=Mid(strVeri,iEuro+50,11) 'satis strEuroSatis1=Mid(strVeri,iEuro+50,6) 'satis strEuroSatis2=Mid(strVeri,iEuro+57,4) 'satis dolar = strDolarSatis1+","+strDolarSatis2 euro = strEuroSatis1+","+strEuroSatis2 'dolar=1 'euro=1 %> Punta - Mak
 

         Teknik Özellikler
Pnömatik sistem
Plc kontrollü Dijital Kumanda
Su Soğutma Tertibatı
Kaynak Mesafesinde İstenilen Uzunluk
380 volt iki faz girişi
24 volt Dc bobin
Çift Kademeli Pedal
Tek tek ve Seri dikiş yapabilme özelliği
Çelik kasa ve konstriksiyon

 

Savaş Punta Makinası  
Tablalı Punta Makinası
Kollu Punta Makinası
Alın Punta Makinası
Alt Üst Hareketli Punta Makinası
Seruo Kontrollü Punta Makinası
Masaüstü Punta Makinası

  Designed By Stratejimedya

Tüm Hakları Saklıdır.