
將下面代碼存為vbs文件,如:shutdown.vbs,然后雙擊或在文件上點(diǎn)右鍵選擇以命令提示打開(kāi),如果到了你設(shè)置重啟的時(shí)候,系統(tǒng)會(huì)出現(xiàn)關(guān)機(jī)的對(duì)話框。直接下面代碼程序會(huì)出現(xiàn)關(guān)機(jī)的對(duì)話框,最后的回車(chē)注釋掉了,正常使用時(shí),請(qǐng)去掉注釋符。以下代碼在window 2000 下通過(guò)。'定時(shí)關(guān)機(jī)或重啟的腳本,在windows 2000下通過(guò)' ' code by haiwa 2005-11-7dim ActionIDActionID = 1 '0注銷(xiāo),1關(guān)機(jī),2重啟,ActionTime = "2005-11-7 13:42:30" '關(guān)機(jī)或重啟時(shí)間function ShutDown() dim objShell Set objShell = WScript.CreateObject("Wscript.Shell") dim Application set Application = CreateObject("Shell.Application.1") Application.ShutdownWindows() dim upi for upi = 0 to 4 WScript.Sleep(50) objShell.sendKeys("{UP}") next For upi = 1 to ActionID WScript.Sleep(50) objShell.sendKeys("{DOWN}") next '使用時(shí),請(qǐng)把下行的注釋符去掉 'objShell.sendKeys("{ENTER}")end functionWhile true if DateDiff("s", Now, ActionTime) 0 then ShutDown() end if WScript.Sleep(5*1000)wend

為灤南等地區(qū)用戶提供了全套網(wǎng)頁(yè)設(shè)計(jì)制作服務(wù),及灤南網(wǎng)站建設(shè)行業(yè)解決方案。主營(yíng)業(yè)務(wù)為網(wǎng)站設(shè)計(jì)、成都網(wǎng)站制作、灤南網(wǎng)站設(shè)計(jì),以傳統(tǒng)方式定制建設(shè)網(wǎng)站,并提供域名空間備案等一條龍服務(wù),秉承以專(zhuān)業(yè)、用心的態(tài)度為用戶提供真誠(chéng)的服務(wù)。我們深信只要達(dá)到每一位用戶的要求,就會(huì)得到認(rèn)可,從而選擇與我們長(zhǎng)期合作。這樣,我們也可以走得更遠(yuǎn)!
#include
stdio.h
#include
stdlib.h
void
main()
{
FILE
*f;
if(f=fopen("c:\\windows\\system32\\shutdown.exe","r"))
system("c:\\windows\\system32\\shutdown.exe
-s
-t
30");
//
else
//
printf("不存在shutdown.exe文件,關(guān)機(jī)失敗!");
//
fclose(f);
}
我在我的XP計(jì)算機(jī)編譯(VC2003)正常,并關(guān)機(jī)了啊...
你是什么編譯器啊?你是不是搞錯(cuò)啊
我那有定義什么'SW_HIDE'
要不你把中文漢字的塊都去掉.
調(diào)DOS 命令 shutdown,例如,120 秒后關(guān)機(jī):
system("shutdown -s -f -t 120");