BlackSpy
*Vıp Projection
- Katılım
- 9 Ağu 2013
- Mesajlar
- 298
- Tepkime puanı
- 0
- Puanları
- 0
- Konuya yorum yapmadan açılmaz.
- Rep vermeyi çok görmeyin
[hide]
Vb.Net ile sitenizdeki üyelik bölümünü programınıza yansıtmak istiyorsanız aşağıdaki adımları izliyerek yapabilirsiniz.
*Anlatım tamamen bana ait'dir, hiçbir yerden alıntı yapılmamıştır.
Gerekenler;
• 2 adet "TextBox" > (1. TextBox ismi = user / 2. TextBox ismi = pass)
• 1 adet "WebBrowser" > (WebBrowser ismi = vb)
• 1 adet "Buton" > (Buton ismi = ok)
• 1 adet "Timer" > (Interval = 3000)
Kod Kısmının En Başına;
PHP:
Imports System.ComponentModel
Imports System.Drawing.Drawing2D
Form_Load Kısmına Yazılacak Kod;
PHP:
vb.Navigate("Login yaptıracağınız site adresi.")
Buton_Click Kısmına Yazılacak Kod;
PHP:
Timer1.Start()
ok.Enabled = False
vb.Document.GetElementById("username").SetAttribute("value", (user.Text))
vb.Document.GetElementById("password").SetAttribute("value", (pass.Text))
vb.Document.GetElementById("submit").InvokeMember("click")
Timer1_Click Kısmına Yazılacak Kod;
PHP:
If vb.DocumentText.Contains("Hey! Naber") = True Then
Timer1.Stop()
Me.Text = "Bilgiler Veri Tabanıyla Doğrulandı"
MsgBox("Giriş Doğrulandı , Programa Yönlendiriliyorsunuz", vbInformation, "Succes")
Me.Close()
frmMain.Show()
Else
Timer1.Stop()
Me.Text = "Bilgiler Veritabanıyla Uyuşmuyor Hata"
MsgBox("Hatalı Giriş Yaptınız Lütfen Bilgileri Doğru Giriniz.", vbCritical, "Hata")
ok.Enabled = True
End If
PHP:
vb.Document.GetElementById("username").SetAttribute("value", (user.Text))
vb.Document.GetElementById("password").SetAttribute("value", (pass.Text))
vb.Document.GetElementById("submit").InvokeMember("click")
(username = Kullanıcı Adı / Password = Şifre / Submit = Buton'un Yola Komutundaki İsmi)
PHP:
("Hey! Naber") = True
*Kodlar bu şekildeyse sorunsuz yapmışınız demektir.
Doğru Giriş Yapınca;
Yanlış Giriş Yapınca;
** Sürekli başarılı uyarısı alıyorsanız form2'nin load kısmına;
Form1.Timer1.Stop
yazın.
[/hide]