在windows2000中關(guān)機(jī)與在windows98中不一樣，需要首先獲得權(quán)限，然后調(diào)用關(guān)機(jī)api函數(shù)，才能關(guān)機(jī)。以下是具體的步驟：
第一步： 聲明結(jié)構(gòu)
-----------------------------------------------------------------------
需要聲明三個(gè)結(jié)：luid, luid_and_attributes, token_privileges
luid
long lowpart
long highpart
luid_and_attributes
luid pluid
long attributes
token_privileges
long privilegecount
luid_and_attributes privileges[]
第二步： 聲明外部擴(kuò)展函數(shù)
-----------------------------------------------------------------------
function ulong exitwindowsex(ulong uflags,ulong dwreserved) library "user32.dll"
function ulong getcurrentprocess() library "kernel32.dll"
function ulong lookupprivilegevalue(ref string lpsystemname,ref string lpname,ref luid lpluid) library "advapi32.dll" alias for "lookupprivilegevaluea"
function ulong adjusttokenprivileges(ulong tokenhandle,boolean disableallprivileges,ref token_privileges newstate,ulong bufferlength,ref token_privileges previousstate,ref ulong returnlength) library "advapi32.dll"
function ulong openprocesstoken(ulong processhandle,ulong desiredaccess,ref ulong tokenhandle) library "advapi32.dll"
第三步： 程序腳本
-----------------------------------------------------------------------
/*獲得關(guān)機(jī)權(quán)限*/
string ls_lpsystemname,ls_lpname
ls_lpname='seshutdownprivilege'
ulong lu_hdlprocesshandle,lu_hdltokenhandle,lu_lbufferneeded
luid lst_tmpluid
token_privileges lst_tkp
token_privileges lst_tkpnewbutignored
lu_hdlprocesshandle = getcurrentprocess()
openprocesstoken(lu_hdlprocesshandle,40, lu_hdltokenhandle)
lookupprivilegevalue( ls_lpsystemname, ls_lpname, lst_tmpluid)
lst_tkp.privilegecount = 1
lst_tkp.privileges[1].pluid = lst_tmpluid
lst_tkp.privileges[1].attributes = 2
adjusttokenprivileges(lu_hdltokenhandle, false, lst_tkp,16, lst_tkpnewbutignored,lu_lbufferneeded)
/*關(guān)機(jī)*/
exitwindowsex (9,0)
/* the end */
如果您在這篇文章里得到了些什么，請(qǐng)給作者一些鼓勵(lì)：[email protected]
注冊(cè)會(huì)員，創(chuàng)建你的web開(kāi)發(fā)資料庫(kù)，
