ASP指令碼組件實現伺服器重啟_應用技巧

來源:互聯網
上載者:User

大家知道直接使用ASP是不能夠重啟伺服器的,這時我們需要製作一個組件來實現功能,ASP通過這個組件調用系統API,然後按照不同的重啟和關機方式進行操作!
下面先說COM的製作,在VB中建立一工程,當然是AceiveX dll的。

1)先修改工程屬性,在工程屬性視窗將工程名稱改為system,在類別模組視窗將模組名稱改為contral,儲存工程;

2)然後添加一個模組,用來聲明需要使用的API和常數,下面是模組中的內容。
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

該函數需要傳入一個參數,用來控制啟動方式,這個參數是從ASP程式中傳入的,等一下就可以看到具體的使用方法!
編寫完上面的代碼,儲存工程,將工程編譯為system.dll。下面就寫ASP程式:
ASP中的代碼非常簡單:

<%atype=request("atype")set sys=server.CreateObject ("system.contral")sys.reboot(atype)%>

其中atype可以使用0、1、2、4,0、1和4均為關機,2用來重啟,寫完後執行ASP即可。

以上就是製作一個ASP指令碼組件使伺服器重啟的實現方法,希望對大家的學習有所協助。

相關文章

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.