ALGUEM SABE COMO REINICIAR O WINDOWS 2000/XP?
ALGUEM SABE COMO REINICIAR O WINDOWS 2000/XP?
http://vbmania.com.br/vbmdetail.php?varID=1117
http://vbmania.com.br/vbmdetail.php?varID=56
http://vbmania.com.br/vbmdetail.php?varID=415
http://vbmania.com.br/vbmdetail.php?varID=212
O primeiro link creio ser o mais útil para você.
http://vbmania.com.br/vbmdetail.php?varID=56
http://vbmania.com.br/vbmdetail.php?varID=415
http://vbmania.com.br/vbmdetail.php?varID=212
O primeiro link creio ser o mais útil para você.
ola, o codigo pra faze o desligamento eh esse
Sub ShutXP(Optional Resetar As Boolean = False)
Dim q
If Resetar = False Then
q = Shell("shutdown.exe -s", vbMinimizedFocus) '(shutdown)
Else
q = Shell("shutown.exe -r", vbMinimizedFocus) '(reboot)
End If
End Sub If
End Sub
Sub ShutXP(Optional Resetar As Boolean = False)
Dim q
If Resetar = False Then
q = Shell("shutdown.exe -s", vbMinimizedFocus) '(shutdown)
Else
q = Shell("shutown.exe -r", vbMinimizedFocus) '(reboot)
End If
End Sub If
End Sub
Tópico encerrado , respostas não são mais permitidas