Category: web

PHPBOT DOVIZ KURLARI – NOBETCI ECZANE KKTC

On By semt20In webLeave a comment

(<?php echo date("d/m/Y")
?>
) DOVİZ KURLARI





<?php

$link = “http://www.kktcmerkezbankasi.org/&#8221;;
$parcala = ‘@

(.*?)a href=”/veriler/doviz_kurlari/kur_sorgulama”@si’;
$botara = str_replace(array(“\n”,”\r”,”\t”), NULL, file_get_contents($link));
preg_match_all($parcala, $botara, $baslik);

echo $baslik[0][0];

?>

—————————————————–

doviz kurları2

<?php
$xml = simplexml_load_file(“http://www.kktcmerkezbankasi.org/kur/gunluk.xml&#8221;);
        echo ‘

‘;
        echo ‘

         

           

           

           

         

       

‘;
        echo ‘

‘;
        foreach ($xml->Resmi_Kurlar->Resmi_Kur as $resmi_kur) {

            echo ‘

           

           

           

         
         

‘;
        }
        echo ‘

# Alış Satış
‘ . $resmi_kur->Sembol . ‘ ‘ . number_format((float) $resmi_kur->Doviz_Alis, 2, ‘.’, ‘,’) . ‘ TL ‘ . number_format((float) $resmi_kur->Doviz_Satis, 2, ‘.’, ‘,’) . ‘ TL

‘;

?>

——————————————————————————







(<?php echo date("d/m/Y")
?>
) NÖBETÇİ ECZANELER





<?php

$link = “http://www.kteb.org/&#8221;;
$parcala = ‘@

(.*?)

@si’;
$botara = str_replace(array(“\n”,”\r”,”\t”), NULL, file_get_contents($link));
preg_match_all($parcala, $botara, $baslik);

echo $baslik[0][0];

?>

Dumpper Jumpstart Wifi

On By semt20In SECURITY, webLeave a comment

https://www.youtube.com/watch?v=4fal4ervc9w
https://www.youtube.com/watch?v=gn1WcoPnQ-U

Program İndir

 Jumpstart klasörünün içine girip Setup’a  ( Uygulama olan) tıklıyoruz. (Gerçi bu klasörün içinde kullanacağımız Dumpper programı hazır olarak varmış, yani diğerine gerek yokmuş ama zarar yok devam edelim.)

Şimdi Dumpper ‘ı açıyoruz. İlk başta Scan‘a basarak etrafımızda bulunan bütün modemleri listeliyoruz.Daha sonra üstte bulunan WPS ‘ye tıklıyoruz.

WPS ‘ye geldiğimizde önce Todas las redes ‘i tıklıyoruz. Daha sonraEscanear ‘a basıyoruz. Wps için uygun olan modemler aşağıdaki gibi listelenmiş oluyor.

Bağlanmak istediğimiz modemi seçiyoruz. Essid yazan bölümde modemin adı, Wps Pin yazan yerde de anlaşılacağı gibi WPS Pin yazıyor. Daha sonraIniciar Jumpstart yazan yere tıklıyoruz. Bundan sonra yapacağımız şey beklemek. Jumpstart programı seçtiğiniz modemi kendiliğinden seçip sahip olduğu şifre listesinden denemeye başlıyor. En fazla 4-5 dakika sürüyor ve bulamadığı takdirde bulamadığını size bildiriyor.

Döviz Kurlarını alma

On By semt20In webLeave a comment
  • Önce IDHTTP ekle ve Uses kısmına clipbrd ekle

 

procedure TForm9.cxButton4Click(Sender: TObject);
var
DolarAlis,EuroAlis,Sterlinalis,merkezbankasisite,mesaj:String;
dolarint,euroint,sterlinint:integer;
begin
try
Merkezbankasisite:=IDHTTP.Get('http://www.tcmb.gov.tr/kurlar/today.html');
except
ShowMessage('Üzgünüm Merkez Bankasına Bağalanamadım.');
exit;
end;


Dolaralis:=Trim( copy( Merkezbankasisite,835,14) );
EuroAlis:=Trim( copy( Merkezbankasisite,1139,4) );
Sterlinalis:=Trim( copy( Merkezbankasisite,1237,4) );

Dolaralis:=StringReplace(dolaralis,'.','',[rfReplaceAll]);
EuroAlis:=StringReplace(euroalis,'.','',[rfReplaceAll]);
Sterlinalis:=StringReplace(sterlinalis,'.','',[rfReplaceAll]);
dolarint:=StrToInt(DolarAlis)-2;
euroint:=StrToInt(Euroalis)-2;
sterlinint:=StrToInt(Sterlinalis)-2;


mesaj:=DateToStr(Date)+' Döviz kurları: Dolar-'+inttostr(dolarint)+' /Euro-'+inttostr(euroint)+' /Sterlin-'+inttostr(sterlinint)+' .İyi çalışmalar...';
Clipboard.AsText:=mesaj;
ShowMessage(mesaj+' Kopyalandı!');
end;