使(shǐ)用(yòng)NetBox編譯(yì)asp 完全擺脫iis束縛
使用 NetBox 可以方(fāng)便的將 asp 應用編譯(yì)成為獨立運行的執行程序,完(wán)全擺脫 iis 的束(shù)縛(fù),在幾(jǐ)乎所(suǒ)有(yǒu)的(de) Windows 版(bǎn)本上麵直接運行,完全不需要考慮平台兼容性和對 asp 運(yùn)行環(huán)境的要求。下麵就是快速移(yí)植已有的 asp 應用的步驟。
一、創(chuàng)建 asp 運行環境
首先創建一個空(kōng)的目錄,在你(nǐ)喜歡的(de)位置,假(jiǎ)設是 d:\websvr。在目錄(lù)中創建一個文(wén)件:main.box,編輯(jí)其內容(róng)為:
Dim httpdShell.Service.RunService "NBWeb", "NetBox Web Server", "NetBox Http Server Sample"'---------------------- Service Event ---------------------Sub OnServiceStart() Set httpd = CreateObject("NetBox.HttpServer") If httpd.Create("", 80) = 0 Then Set host = httpd.AddHost("", "\wwwroot") host.EnableScript = true host.AddDefault "default.asp" host.AddDefault "default.htm" httpd.Start else Shell.Quit 0 end if End SubSub OnServiceStop() httpd.Close End SubSub OnServicePause() httpd.Stop End SubSub OnServiceResume() httpd.Start End Sub
上麵(miàn)的(de)代碼摘自《創建(jiàn)一個(gè) WEB 服務器》。其中加粗(cū)的部分是缺省文件名(míng),如果你的應用不(bú)同,可以自行添加修改。
二、複製 asp 應用
在(zài)目錄中再創(chuàng)建一個子目錄:wwwroot,將你在 iis 中的(de)文件全部複製到 wwwroot 中。此(cǐ)時,你的 asp 運行環(huán)境應該已經準(zhǔn)備好了。
三、測(cè)試運(yùn)行(háng)
為(wéi)了運行你剛才新建的 netbox 應用,你(nǐ)必須確認你(nǐ)的 iis 或(huò)者其他占用 80 端口的程序已經停止,較大的(de)可能(néng)是你的 iis 在(zài)使用這個端口,所以最好停(tíng)止你的 iis,或者將 iis 的使用端口更(gèng)換為其他端口。
在(zài)確(què)保 iis 已經停止後,你便可以執(zhí)行(háng)你的 netbox 應用(yòng)了。雙擊 main.box 文件,很快(kuài),你將在窗口右下角(jiǎo)看見 netbox 的圖(tú)標。此時(shí),netbox 已經正(zhèng)常運(yùn)行了(le)。你需要做的是使(shǐ)用 ie 訪問 http://localhost 測(cè)試你的 asp 應(yīng)用是否也已經正常運行。一般情況下此(cǐ)時 asp 也(yě)已經完全正常運行了。
四、編(biān)譯
編譯的過程是簡單的,執行(háng) nbdw.exe。
點 Select Folder,找到(dào)剛才我們建立的(de)目錄 d:\websvr,點(diǎn) Browser,設定要生成的(de)執行文件名,點(diǎn) Build...,開始編譯。
成功嘍……
最後,我們得(dé)到了編譯成功的那個執(zhí)行文件,這個就是我們的(de)最後目標。
因為這個(gè)例程是(shì)以服務方式創(chuàng)建(jiàn)的 Web 服務(wù)器,所以你可以使用:
myapp -install
將應用安裝(zhuāng)成為服務,這樣,係統無須登錄便可以自動運行應用了。如果需要卸載服務,則可以執行下麵的命令:
myapp -remove
關鍵詞:NetBox,asp,iis
閱(yuè)讀(dú)本(běn)文後您(nín)有什(shí)麽感(gǎn)想? 已有 人給出評價!
- 0
- 0
- 0
- 0
- 0
- 0