Remote Shutdown for LAN - Visual Basic 6.

[Anteos]

Code:


Private Sub cmdShutdown_Click()
Shell "Shutdown -f -s -t 00 -m \\" & txtIP.Text
End Sub

Private Sub cmdRestart_Click()
Shell "Shutdown -f -r -t 00 -m \\" & txtIP.Text
End Sub

Private Sub txtIP_Change()
Text1.Text = ""
End Sub


HF.

-AnteosCreations