Visual Basic - HOLA SOY NUEVA ME PODRIAN AYUDAR

COMO PODRIA ABRIR LA VENTANA DE APAGAR EL EQUIPO DESDE MI PROYECTO

GRACIAS

Hola la verdad no c, pero aki te mando algo haber si te sirve: XD

====Apagar, Reiniciar el Equipo, Reiniciar Windows====

Agregar el siguiente codigo a un Modulo:

Declare Function ExitWindowsEx Lib "user32" Alias "ExitWindowsEx" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long

Nota: Debe estar todo en una sola linea (Usar el Visor de Texto API, que viene con Visual Basic)

Agregar el siguiente codigo a tres commandbutton definidos para la prueba, con la propiedad Name segun se describe:

Command1 - cmdApagar
Command2 - cmdReiniciarWindows
Command3 - cmdReiniciarEquipo

El codigo a escribir es el siguiente:

Private Declare Sub cmdApagar_Click()
Dim i As Integer
i = ExitWindowsEx(1, 0&)
End Sub

Private Declare Sub cmdReiniciarWindows_Click()
Dim i As Integer
i = ExitWindowsEx(0, 0&)
End Sub

Private Declare Sub cmdReiniciarEquipo_Click()
Dim i As Integer
i = ExitWindowsEx(2, 0&)
End Sub

Cuando utiliza el API de ExitWindowsEx para reiniciar el sistema en Windows NT y Windows 2000, no se reinicia el equipo.
Volver al principio

Causa
Para reiniciar un sistema Windows NT o Windows 2000 mediante programación, el proceso requiere el privilegio SE_SHUTDOWN_NAME. De forma predeterminada, las aplicaciones de Visual Basic no tienen este privilegio y por tanto, de forma predeterminada, no reiniciarán el equipo.

lean aca:
http://support.microsoft.com/default.aspx?scid=kb;es;176695

Te envío un ejemplo a tu correo!!!