exit program and log off as xp user

[Ini]

Hi,

I'm using VB6 and Windows XP. For an user on my computer (my 3 year old
daughter) I wrote a program in VB. For reasons of security the program
automaticly starts as she logs in on her user-account.

Now I'm wondering if it's possible to automaticly log off at the moment the
VB-program is ended
I now use a command-button with the "End"-statement, so you return to the
desktop. Can I use another command or do I need to call an external command?
If so, how?

Thanks,

Ini

[New_Entry]

> I'm using VB6 and Windows XP. For an user on my computer (my 3 year old

daughter) I wrote a program in VB. For reasons of security the program
automaticly starts as she logs in on her user-account.

Now I'm wondering if it's possible to automaticly log off at the moment the VB-program is ended
I now use a command-button with the "End"-statement, so you return to the
desktop. Can I use another command or do I need to call an external command? If so, how?

look at http://www.mentalis.org/tips/tip016.shtml

you can see:

Use the function ExitWindowsEx. This function has two parameters. The first
is one or more flags to instruct windows how to shutdown. These are listed
below along with the declarations. The second part of the function is
reserved, and it set to zero. It is important to unload your application to
help the system to shut down smoothly. The declarations for this function
are below.
Public Const EWX_LOGOFF = 0
Public Const EWX_SHUTDOWN = 1
Public Const EWX_REBOOT = 2
Public Const EWX_FORCE = 4

Declare Function ExitWindowsEx Lib "user32" Alias _
"ExitWindowsEx" (ByVal uFlags As Long, ByVal dwReserved _
As Long) As Long

If you wanted to forcefully reboot the computer use the following code:

t& = ExitWindowsEx(EWX_FORCE OR EWX_REBOOT, 0)

If you wanted to logoff the computer use the following code:

t& = ExitWindowsEx(EWX_LOGOFF, 0)

Bye Luca