MODO DE SEGURANCA

CARLINHOS.SONEG 25/02/2011 11:48:37
#366573
Galera preciso fazer o meu sistema feito em vb6 reiniciar o windows seven / vista em modo de segurança e depois automaticamente executar o mesmo sistema (já em modo de segurança) e depois reiniciar novamente em modo normal, alguém tem idéia de como fazer?
QUASAR23 25/02/2011 17:25:20
#366615
Resposta escolhida
Cara tem jeito de desligar reiniciar e tals pelo vb agora se vc quiser selecionar modo de segurança é melhor prtir para o C++ C# ao com mais poder de fogo,

Ai segue o codigo apara desligar,fazer logoff e reiniciar

Public Declare Function ExitWindowsEx Lib [Ô]user32[Ô] _
Alias [Ô]ExitWindowsEx[Ô] (ByVal uFlags As Long, _
ByVal dwReserved As Long) As Long

Public Const EWX_LOGOFF As Long = 0 [ô]Faz Logoff do usuário.
Public Const EWX_SHUTDOWN As Long = 1 [ô]Desligar o computador.
Public Const EWX_REBOOT As Long = 2 [ô]Reiniciar o computador.
Public Const EWX_FORCE As Long = 4 [ô]Força a ação desejada.

[ô]No evento que você desejar:
Dim RET as Long
[ô]P/ fazer logoff do usuário:
RET = ExitWindowsEx(EWX_LOGOFF, 0)
[ô]P/ desligar o computador:
RET = ExitWindowsEx(EWX_SHUTDOWN, 0)
[ô]P/ reiniciar o computador
RET = ExitWindowsEx(EWX_REBOOT, 0)

[ô]Se você quizer [Ô]forçar[Ô] a ação a ser executada, faça
[ô]da seguinte maneira:

[ô]P/ fazer logon com outro usuário:
RET = ExitWindowsEx(EWX_FORCE Or EWX_LOGOFF, 0)
[ô]P/ desligar o computador:
RET = ExitWindowsEx(EWX_FORCE Or EWX_SHUTDOWN, 0)
[ô]P/ reiniciar o computador
RET = ExitWindowsEx(EWX_FORCE Or EWX_REBOOT, 0)
[ô]P/ reiniciar o computador
RET = ExitWindowsEx(EWX_FORCE Or EWX_REBOOT, 0)


abraço.
Tópico encerrado , respostas não são mais permitidas