Programación General > Visual Basic 6.0 e inferiores

 Re: Apagar y reiniciar el ordenador

(1/1)

Sonnya:
:hippi:Hola de nuevo, alguien sabe el codigo que habria que utilizar para apagar el ordenador, cerrar sesion y reiniciar el ordenador?? Gracias de antemano.Besos *Sonnya*:kiss:

José D:
:ahora: Si, aquí está:

 
--- Código: Text --- Private Declare Function ExitWindowsEx& Lib "user32" (ByVal uFlags&, ByVal dwReserved&)Dim i As Integer Private Sub Commad1_Click()    If Option1.Value = True Then         i = ExitWindowsEx(1, 0&) 'Apaga el equipo    End If        If Option2.Value = True Then         i = ExitWindowsEx(2, 0&) 'Reinicia el Sistema    End If        If Option3.Value = True Then        i = ExitWindowsEx(0, 0&) 'iniciar Windows con nuevo usuario    End IfEnd Sub  
Eso lo tengo en un Formulario con OptionButton igual como la ventanita de Windows que pide a escoger, no sé cómo deseas aplicarlo en tu caso.

PD: Parece que las caritas hacen de las suyas:D en esa parte es & )

iron man:
Solucionado el problema con las caritas que aparecían en el código;)

Navegación

[0] Índice de Mensajes