Shut Down Windows 2000...?

[Wolfsnap]

I need to able to shut down Windows 2000 in VB.net. Im developing an application that will run on an industrial PC interface controlling a piece of machinery in a truck. When a "job" is complete, I need to shut down the interface to avoid corrupting the OS and systems on the PC (as opposed to the operator just cutting the power).

Ive got this code so far, which allows me to restart and log off, but it wont work for a full shutdown.

Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Integer, ByVal dwReserved As Integer) As Integer

Declarations
Public Enum ExitWindowsFlags
    EWX_LOGOFF = 0
    EWX_REBOOT = 2
    EWX_SHUTDOWN = 1
    EWX_FORCE = 4
End Enum
    
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    ExitWindows(0)
End Sub

I think that I need to set some sort of permissions or authorizations to do a full shutdown, but I am having no luck finding a working example to achieve this.

Any help would me EXTREMELY appreciated!

Wolf

 

[Wolfsnap]

BTW - Ive tried all kinds of "settings" for the "ExitWindows" call. 0 logs a user off, and 4 does the same thing, 2 and 1 do nothing.

 

[Wolfsnap]

Another question - how do I post nice clean VB code in its own window here?

(I apologize for my ignorance)

Wolf

 

[samsmithnz]

I know nothing about logging off winfows, but use the [ code ] tags to post code here. (dont forget to close it with a [/ code ] tag (not spaces)

 

[Derek Stone]

The process needs to have the SE_SHUTDOWN_NAME privilege granted to it prior to calling [api]ExitWindowsEx[/api](). Request the privilege using [api]AdjustTokenPrivileges[/api]().