İş Bankası İnternet Şubesine Giriş (Webbrowser)

G.Arkas · Mesaj gönderen **G.Arkas** » 18 Tem 2009 10:07

Merhaba arkadaşlar dökümanımda sizlere webrowser ile post methodunu kullanarak

* İş bankası İnternet Şubesine Giriş
* Google Mail (Gmail) e giriş yapmayı açıklayacağım.

Kullandığım Bileşenler

* EmbeddedWB (Tercihen TWebbrowser kullanılabilir)

Öncelikle kodumuz

Kod: Tümünü seç

EmbeddedWB1.Navigate( 'https://www.isbank.com.tr/Internet/index.aspx?langcode=tr-TR&width=1152&height=834' );
While EmbeddedWB1.ReadyState <> READYSTATE_COMPLETE do Application.ProcessMessages;
EmbeddedWB1.OleObject.Document.GetElementByID('_ctl0:MusNoText').Value:=edit1.text;
EmbeddedWB1.OleObject.Document.GetElementByID('ParolaText').Value:=edit2.Text;
EmbeddedWB1.OleObject.Document.GetElementByID('_ctl0:SubeLogin01_btnGiris').Click;

Burada İşbankasının HTML kodları arasından post edeceğimiz verileri görebiliyoruz.

* _ctl0:MusNoText (Müşteri Numarası)
* ParolaText' (Parola)
* _ctl0:SubeLogin01_btnGiris (Giriş Butonu)

Post ettiğimiz adres = https://www.isbank.com.tr/Internet/inde ... height=834' (Şubeye giriş sayfası)

Projenin Bitmiş hali Lintedir.

Aynı mantığı kullanarak Gmail e giriş yapalım

Kodumuz :

Kod: Tümünü seç

EmbeddedWB1.Navigate( 'http://mail.google.com/mail/?hl=tr&zx=1idp6hsk9b13b&shva=1#compose' );
While EmbeddedWB1.ReadyState <> READYSTATE_COMPLETE do Application.ProcessMessages;
EmbeddedWB1.OleObject.Document.GetElementByID('email').Value     :='xxxxx@gmail.com';
EmbeddedWB1.OleObject.Document.GetElementByID('Passwd').Value        :='123456789';
EmbeddedWB1.OleObject.Document.GetElementByID('signIn').Click;

Bu kodda post ettiğimiz adresin sonunda ki "#compose" verisinin yerine "#inbox' eklerseniz doğrudan gelen kutunuza gidersiniz.

Mantık aynı bu kodu bir Button1 onclick event e ekleyin.
1 adette webbrowser ekleyin ve kullanmaya başlayın.

Not: İş bankasının müşteri numaraları 9 hanelidir.Eğer sizinki değilse önüne 9 haneye gelecek kadar " 0 " ekleyip kullanabilirsiniz.

Gürkan Arkaş.

tugsat · Mesaj gönderen **tugsat** » 20 Tem 2009 01:26

Çok yararlı bir makale hazırlamışsınız TEŞEKKÜRLER..

Lost Soul · Mesaj gönderen **Lost Soul** » 22 Tem 2009 11:17

çalışma için teşekkürler.

cozturk · Mesaj gönderen **cozturk** » 22 Tem 2009 03:02

Uzun bir şifre kullanıyorsanız, diğer mekanlarda elinizle yazmak istemiyor olabilirsiniz.
Gmaile daha kolay giriş için aşağıdaki kodu gmail.htm olarak kaydedin
ve gmaile girmek istediğiniz zaman bunu açın. usb bellek veya Cd içerisinden de çalıştırılabilir.

Kod: Tümünü seç

<body onload="document.main_login_form.submit()"> 
  <form action="https://www.google.com/accounts/ServiceLoginAuth?service=mail" method="post" name="main_login_form"> 
  <input type="hidden" name="continue" id="continue" value="http://mail.google.com/mail/#inbox" />
  <input type="text" name="Email"  value="sizinusername"> 
  <input type="password" name="Passwd"    value="sizinparola"> 
  </form> 
</body>

Bunu internet explorer ile açarken uyarı çıkıyor ve onay verdikten sonra bağlanıyor. firefox ile sorun yok.
bu dosyayı cep telefonuna da yükledim. gmaile kolayca girmeyi sağlıyor.

Bu yöntem sayesinde bir formu, ek program olmaksızın otomatik doldurmuş oluyoruz. Başka siteler için de çok rahat kullanılır.

ElectroNick · Mesaj gönderen **ElectroNick** » 22 Tem 2009 07:26

teşekkürler.. hotmaile uyarlanmış hali aşağıda..

Kod: Tümünü seç

wB1.Navigate( 'http://login.live.com/login.srf?wa=wsignin1.0&rpsnv=11&ct=1248279367&rver=5.5.4177.0&wp=MBI&wreply=http:%2F%2Fmail.live.com%2Fdefault.aspx&lc=1055&id=64855&mkt=tr-TR' );
While WB1.ReadyState <> READYSTATE_COMPLETE do Application.ProcessMessages;
WB1.OleObject.Document.GetElementByID('login').Value     :=edit1.Text;
WB1.OleObject.Document.GetElementByID('passwd').Value        :=edit2.Text;
WB1.OleObject.Document.GetElementByID('SI').Click;

ElectroNick · Mesaj gönderen **ElectroNick** » 22 Tem 2009 07:35

peki şifre yanlışsa bunu nasıl kontrol edebiliriz? örneğin bir label a hatalı şifre yazsın..

G.Arkas · Mesaj gönderen **G.Arkas** » 29 Tem 2009 02:37

gelen cevaba göre bir hata kodu üretiyor olmalı bunu bir şart kipinin içine alıp parseleyebilirsin.

tugsat · Mesaj gönderen **tugsat** » 14 Haz 2010 03:59

Merhaba benim sormak istediğim bu sitelerdeki butonların , editlerin vs. değişken adlarını nasıl kolay bir şekilde tespit edebiliriz ? _ctl0:MusNoText (Müşteri Numarası)
* ParolaText' (Parola)
* _ctl0:SubeLogin01_btnGiris (Giriş Butonu) mesela bunları hangi yolla tesbit ettiniz ?

Diğer sorumsa ; Uygulamaların class adlarını "Greatis WinDowse" adlı bir program yardımıyla buluyorum , şuan bir uygulamanın class adını bulmam gerekiyor ancak bu uygulama kullandığım greatis windowse programını otomatik disable ediyor ve program kullanılamıyor bu tür engellemesi olan bir uygulamanın class adını içersindeki edit , button vesaire bileşenlerin sınıf adı ve değer isimlerin vesaire nasıl tesbit edebilirim.. ? Şimdiden cevaplar için teşekkür eder , iyi günler dilerim..

tugsat · Mesaj gönderen **tugsat** » 14 Haz 2010 03:03

Foruma giren yokmu artık , yoksa banamı öyle geliyor ..

G.Arkas · Mesaj gönderen **G.Arkas** » 15 Haz 2010 08:23

Mozilla 2.0 Kullanın ve addons seçeneklerinden URLParams adlı eklentiyi indirin o eklenti get ve post parametrelerini yakalayıp değerlerini okuyabiliyor.

urlParams

Delphi Forum

İş Bankası İnternet Şubesine Giriş (Webbrowser)

İş Bankası İnternet Şubesine Giriş (Webbrowser)

Re: İş Bankası İnternet Şubesine Giriş (Webbrowser)

Re: İş Bankası İnternet Şubesine Giriş (Webbrowser)

Re: İş Bankası İnternet Şubesine Giriş (Webbrowser)

Re: İş Bankası İnternet Şubesine Giriş (Webbrowser)

Re: İş Bankası İnternet Şubesine Giriş (Webbrowser)

Re: İş Bankası İnternet Şubesine Giriş (Webbrowser)

Re: İş Bankası İnternet Şubesine Giriş (Webbrowser)

Re: İş Bankası İnternet Şubesine Giriş (Webbrowser)

Re: İş Bankası İnternet Şubesine Giriş (Webbrowser)