也许是好东西——Windows Script Host-5[关机/For win9x]
发表于:2007-06-30来源:作者:点击数:
标签:
‘’************************************************ ‘’ File:RunExit. vb s (WSH sample in VB Script) ‘’ Author:(c) G. Born ‘’ ‘’ Using the Run method to call the Windows 95/98 ‘’ ExitWindows API function ‘’**********************
‘’************************************************
‘’ File: RunExit.
vbs (WSH sample in
VBScript)
‘’ Author: (c) G. Born
‘’
‘’ Using the Run method to call the Windows 95/98
‘’ ExitWindows API function
‘’************************************************
Option Explicit
Dim WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
If (MsgBox("Shut down Windows 95/98", vbYesNo + vbQuestion, _
"WSH sample - by G. Born") = vbYes) Then _
WshShell.Run _
"%WINDIR%\RunDll32.exe user,ExitWindows", 1, -1
‘’*** End
原文转自:http://www.ltesting.net