Amigo pero no existe alguna Api que haga eso? y otra cosa si no sabes o te da muchos problemas, ¿ese código realmente sirve?
Saludos
Saludos
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúPor último cabe aclarar que en este resumido tutorial y en cualquier otro tutorial que encuentres, jamás podrás ver por completo todo esto relacionado a las funciones Api, ya que son miles de funciones y no alcanzarían ni 1000 manuales como para explicar todo. El sitio con mas información es sin duda la web de Microsoft, pero la mayoría de los ejemplos no están en Visual Basic por lo tanto se complica un poco buscar información.
podemos agregar que teniendo suficientes conocimientos de programación, y con un lenguaje apropiado como c++, podemos crear dichas funciones.
Option Explicit
'Control de Apagar, Cerrar Session, reiniciar
Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
Const EWX_LOGOFF = 0
Const EWX_SHUTDOWN = 1
Const EWX_REBOOT = 2
Const EWX_FORCE = 4
Private Sub Command1_Click(Index As Integer)
Select Case Index
Case 0 'Cerrar Session
ExitWindowsEx EWX_LOGOFF, 0 'Cierra sesión en Win 98, 2000, XP
Case 1 'Reiniciar PC
ExitWindowsEx EWX_REBOOT, 0 'Reinicia el Sistema
Shell "shutdown -r -f -t 0" 'Reinicia el equipo en Win XP
Case 2 'Apagar PC
ExitWindowsEx EWX_SHUTDOWN, 0 'Apaga el equipo en Win 98, 2000
Shell "shutdown -s -t 0" 'Apaga el equipo en Win XP
End Select
End Sub