Kalau mo restart atau shutdown Windows dari VB, hari pakai API "ExitWindowsEX".
Commandnya ini saya ambilkan dari MSDN Visual Studio :
ExitWindowsEx
The ExitWindowsEx function either logs off the current user, shuts down the system, or
shuts down and restarts the system. It sends the WM_QUERYENDSESSION message to all
applications to determine if they can be terminated.
BOOL ExitWindowsEx(
UINT uFlags, // shutdown operation
DWORD dwReserved // reserved
);
Parameters
uFlags
Specifies the type of shutdown. This parameter must include one of the following
values: Value Meaning
EWX_LOGOFF Shuts down all processes running in the security context of the
process that called the ExitWindowsEx function. Then it logs the user off.
EWX_POWEROFF Shuts down the system and turns off the power. The system must
support the power-off feature.
Windows NT: The calling process must have the SE_SHUTDOWN_NAME privilege. For
more information, see the following Remarks section.
EWX_REBOOT Shuts down the system and then restarts the system.
Windows NT: The calling process must have the SE_SHUTDOWN_NAME privilege. For
more information, see the following Remarks section.
EWX_SHUTDOWN Shuts down the system to a point at which it is safe to turn off
the power. All file buffers have been flushed to disk, and all running processes have
stopped.
Windows NT: The calling process must have the SE_SHUTDOWN_NAME privilege. For
more information, see the following Remarks section.
This parameter can optionally include the following values: Value Meaning
EWX_FORCE Forces processes to terminate. When this flag is set, the system
does not send the WM_QUERYENDSESSION and WM_ENDSESSION messages. This can cause the
applications to lose data. Therefore, you should only use this flag in an emergency.
EWX_FORCEIFHUNG Windows NT 5.0 and later: Forces processes to terminate if
they do not respond to the WM_QUERYENDSESSION or WM_ENDSESSION message. This flag is
ignored if EWX_FORCE is used.
dwReserved
Reserved; this parameter is ignored.
Return Values
If the function succeeds, the return value is nonzero.
If the function fails, the return value is zero. To get extended error information,
callGetLastError.
Remarks
The ExitWindowsEx function returns as soon as it has initiated the shutdown. The
shutdown or logoff then proceeds asynchronously.
During a shutdown or log-off operation, applications that are shut down are allowed a
specific amount of time to respond to the shutdown request. If the time expires, the
system displays a dialog box that allows the user to forcibly shut down the
application, to retry the shutdown, or to cancel the shutdown request. If the
EWX_FORCE value is specified, the system always forces applications to close and does
not display the dialog box. If the EWX_FORCEIFHUNG value is specified, the system
forces hung applications to close and does not display the dialog box.
Console processes receive a separate notification message, CTRL_SHUTDOWN_EVENT or
CTRL_LOGOFF_EVENT, as the situation warrants. A console process routes these messages
to its HandlerRoutine functions, which are added and removed by calls to the
SetConsoleCtrlHandler function. ExitWindowsEx sends these notification messages
asynchronously; thus, an application cannot assume that the console notification
messages have been handled when a call to ExitWindowsEx returns.
Windows NT: To shut down or restart the system, the calling process must use
theAdjustTokenPrivileges function to enable the SE_SHUTDOWN_NAME privilege. For more
information about security privileges, seePrivileges.
Windows 95: ExitWindowEx does not work from a console application, as it does on
Windows NT.
----- Original Message -----
From: starbali
To: [EMAIL PROTECTED]
Sent: Senin, 11 September, 2000 8:52
Subject: [MIKRODATA] Restart & Shut Down dari VB
Salam jumpa untuk maillist semua
Maillist yang terhormat, saya ada kesulitan kalau ada rekan yang tahu tolongin saya
yaaa..
1) Saya mau restart dari VB-50 gemana commandnya ?.
2) Gemana pula commandnya untuk shutdown dari VB-50 ?.
Terima kasih untuk bung irsya dan bung iwan yang telah merespon timer saya, apakah
sudah berhasil download nasm - nya. Kalau belum saya bisa bantu download dimana alamat
tepanya, karena banyak sekalai waroengvb.
Udin-Denpasar
Bali
