Pls sat why it doesnt work in W2k

[shragel]

Private Sub Command1_Click()
answer = MsgBox("Are You Sure You Want To Close Windows", vbYesNo)
If answer = vbYes Then
ss = ExitWindowsEx(EWX_SHUTDOWN, 0)
End If
End Sub

Pls explain why it doesnt work in Win 2000 Pro SP1.
And what code will work

[amitabh]

You might not have permissions to shut down the computer on the machine.

[Tygur]

Windows 2000 and NT have extra security features. Your program has to do some extra stuff before it can shutdown the computer (basically, it has to request permission). Go to this link:
http://www.planet-source-code.com/xq...s/ShowCode.htm

It'll explain everything for you.