大家知道直接使用ASP是不能夠重啟服務(wù)器的,這時我們需要制作一個組件來實現(xiàn)功能,ASP通過這個組件調(diào)用系統(tǒng)API,然后按照不同的重啟和關(guān)機方式進行操作!
下面先說COM的制作,在VB中新建一工程,當(dāng)然是AceiveX dll的。
1)先修改工程屬性,在工程屬性窗口將工程名稱改為system,在類模塊窗口將模塊名稱改為contral,保存工程;
2)然后添加一個模塊,用來聲明需要使用的API和常數(shù),下面是模塊中的內(nèi)容。
Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
3)在類模塊中輸入下列代碼:
- Public Function reboot(atype As Variant)
- t& = ExitWindowsEx(1, atype)
- End Function
新聞熱點
疑難解答