kamu bisa pake fungsi windows api ExitWindowsEx
mis:
Private Declare Function ExitWindowsEx Lib "user32.dll" ( _
ByVal uFlags As Long, _
ByVal dwReserved As Long) As Long
Private Const EWX_LOGOFF = 0
Private Const EWX_SHUTDOWN = 1
Private Const EWX_REBOOT = 2
Private Const EWX_FORCE = 4
Private Sub Command1_Click()
Dim retval As Integer
retval = ExitWindowsEx(EWX_SHUTDOWN, 0)
End Sub
ByVal uFlags As Long, _
ByVal dwReserved As Long) As Long
Private Const EWX_LOGOFF = 0
Private Const EWX_SHUTDOWN = 1
Private Const EWX_REBOOT = 2
Private Const EWX_FORCE = 4
Private Sub Command1_Click()
Dim retval As Integer
retval = ExitWindowsEx(EWX_SHUTDOWN, 0)
End Sub
best regards
[wwn]
On 12/24/05, clionhearts <[EMAIL PROTECTED]> wrote:
kalao ingin pake rundll32 gmana?saya coba dgn printah di bawah ini ga berhasil. thanks----- Original Message -----From: JemyX ShinichiSent: Friday, December 23, 2005 12:48 PMSubject: Re: [Programmer-VB] tanya shutdown restart winx[
shutdown [-i | -l | -s | -r | -a] [-f] [-m \\computername] [-t xx] [-c "comment"] [-d up:xx:yy]No args Display this message (same as -?)
-i Display GUI interface, must be the first option
-l Log off (cannot be used with -m option)
-s Shutdown the computer
-r Shutdown and restart the computer
-a Abort a system shutdown
-m \\computername Remote computer to shutdown/restart/abort
-t xx Set timeout for shutdown to xx seconds
-c "comment" Shutdown comment (maximum of 127 characters)
-f Forces running applications to close without warning
-d [u][p]:xx:yy The reason code for the shutdown
u is the user code
p is a planned shutdown code
xx is the major reason code (positive integer less than 256)
yy is the minor reason code (positive integer less than 65536)----- Original Message -----From: clionheartsSent: Thursday, December 22, 2005 9:09 PMSubject: [Programmer-VB] tanya shutdown restart winx[
rekan2saya sedang blajar buat prog pake vbkyk billing gitu,gmana cara shutdown, restart, dll di win xp?bs kasi printah nya?exec runddl32 ( klo win98) klo di xp gmana?mohonpencerahannya. thanks
Untuk keluar dari millis ini, kirim email kosong ke:
[EMAIL PROTECTED]
YAHOO! GROUPS LINKS
- Visit your group "Programmer-VB" on the web.
- To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
- Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
