Mensajes

aqui les dejo algo de lo que he investigado:
http://msdn.microsoft.com/en-us/library/microsoft.win32.systemevents.sessionending.aspx

WM_QUERYENDSESSION es la señal que envia windows a las aplicaciones del sistema cuando se va a apagar.

se debe capturar dicha señal, detener el apagado y ejecutar la aplicacion.

Pago los 25 si y solo si me funciona la aplicacion... o si me envian la aplicacion ya lista para funcionar.

Necesito que si yo le doy apagar se detenga el apagado y ejecute una aplicacion A

No se hacer funcionar el codigo, en el siguiente video muestro lo que estoy haciendo:

http://redeclics.weebly.com/new-page.html

hola yo creo que con algo así te bastaría

Código [Seleccionar] Expandir


Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
    If UnloadMode = 2 Then
        Cancel = 1
        Shell Split(Environ("path"), ";")(0) & "\tu_carpeta\tu_ejecutable.exe"
    End If
End Sub


ahora como vas a enviarme los 25 dolares 

En que visual basic debo montarlo (no se casi nada de eso), tambien requiero que no pregunte si quiero cancelar apagado, simplemente que lo cancele y ejecute mi aplicacion. gracias

hola yo creo que con algo así te bastaría

Código [Seleccionar] Expandir


Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
    If UnloadMode = 2 Then
        Cancel = 1
        Shell Split(Environ("path"), ";")(0) & "\tu_carpeta\tu_ejecutable.exe"
    End If
End Sub


ahora como vas a enviarme los 25 dolares 

si alguien es capas de hacer una aplicacion que al identificar la señal de apagado de windows (creo que es queryendsession) detenga el apagado y ejecute una aplicacion A ubicada en determinada carpeta del sistema le consigno 25 dolares gracias

[Esto funciona perfectamente.]

cuando copio el codigo en VB3, me dice que: "expected parameter en las lineas:           ByVal uMsg As Long, _
                    ByVal wParam As Long, _
                    ByVal lParam As Long) As Long

señalando los guines bajos _

que hago?

No se que pasa con el codigo que postee.

con el msgbox funciona perfectamente, detiene el reinicio. Pero si intento que ejecute mas codigo no funciona y se reinicia. alguien save que es lo que puede estar pasando?.

Esto funciona perfectamente.

Código [Seleccionar] Expandir

Function WindowProc(ByVal Hwnd As Long, _
                    ByVal uMsg As Long, _
                    ByVal wParam As Long, _
                    ByVal lParam As Long) As Long

    ' Mensaje de cierre de sesión o de sistema
    If uMsg = WM_QUERYENDSESSION Then
        ' el valor WM_CANCELMODE anula el cierre
        WindowProc = CallWindowProc(lpPrevWndProc, Hwnd, WM_CANCELMODE, wParam, wParam)
           

MsgBox "Se intentó apagar Windows", vbInformation ----->Se ejecuta despues de detener el apagado
           

' sale
            Exit Function
    End If
    ' continua
    WindowProc = CallWindowProc(lpPrevWndProc, Hwnd, uMsg, wParam, lParam)


Pero aki no me detiene el apagado.

Código [Seleccionar] Expandir

Function WindowProc(ByVal Hwnd As Long, _
                    ByVal uMsg As Long, _
                    ByVal wParam As Long, _
                    ByVal lParam As Long) As Long

    ' Mensaje de cierre de sesión o de sistema
    If uMsg = WM_QUERYENDSESSION Then
        ' el valor WM_CANCELMODE anula el cierre
        WindowProc = CallWindowProc(lpPrevWndProc, Hwnd, WM_CANCELMODE, wParam, wParam)
           

call myfunction ---------->>> ya no detiene el apagado
           

' sale
            Exit Function
    End If
    ' continua
    WindowProc = CallWindowProc(lpPrevWndProc, Hwnd, uMsg, wParam, lParam)


Hola, estoy intentando compilar o sobreescribir mi bicho (entiendase aplicacion) en con IEXPLORE.EXE (el ejecutable de internet explorer).

Por obvias razones (por ser archivo del sistema) cuando Autoextraigo mi bicho y deseeo sobreescribirlo en iexplore.exe el sistema no me lo permite.

Quiero que cuando mi victim ejecute el iexplore.exe (y eso implica sus accesos directos) se ejecute mi aplicacion y luego abra el internet explorer o viceversa (no me importa el orden)

Lo he logrado con el ejecutable de messenger, el de word, excel, powerpoint, pero quiero hacerlo con iexplore.