Mensajes

Pero no me sale nada.

Ok, gracias por la info, entonces sería
PathTo ("archivoabuscar.exe")
no
PathTo('archivoabuscar.exe')

Yo estoy haciendo unas con 4 colaborados activos de este foro.

Hola estaba buscando la manera de que al enviar un codigo pito ping desde VB no se cerrarse al terminar, pero como lo veo imposible e pensado en lanzar CMD y luego lo que necesito que es "netstat -n" lanzando letras, se que se podia por que vi algo así para las ventanas de conversación del msn.

como?¿
PHP?

No es:

Private Sub Command1_Click()
PathTo('archivoabuscar.exe')
End Sub

creo que es:

Private Sub Command1_Click()
PathTo "archivoabuscar.exe"
End Sub

lo de blockear el teclado y el alt + contr.... lo saque de hay pero gracias.

Pero donde coloco el:

shell "netstat >Salida.Txt",vbhide

Yo lo pongo así y no funciona:

Private Declare Function ShellExecute Lib "shell32.dll" Alias _
    "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, _
    ByVal lpFile As String, ByVal lpParameters As String, _
    ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
   
   

Sub command1_click()
Dim res As Long
res = ShellExecute(Me.hwnd, "Open", "salida.txt", "", "", 1)
End Sub

En la proxima versión:

- Mejor interface grafica
- Te detiene el keylogger
- Te averigua la IP de el atacante.

Sorry soplo pero se cierra

Hola, haber si me explico, necesito manterner la consola, por ejemplo si pongo el codigo:
Shell "netstat"
Que cuando termine no se cierre