編譯|程式 使用 NetBox 可以方便的將 asp 應用編譯成為獨立啟動並執行執行程式,完全擺脫 iis 的束縛,在幾乎所有的 Windows 版本上面直接運行,完全不需要考慮平台相容性和對 asp 運行環境的要求。下面就是快速移植已有的 asp 應用的步驟。
一、建立 asp 運行環境
首先建立一個空的目錄,在你喜歡的位置,假設是 d:websvr。將 netbox.exe 複製到這個目錄,然後在目錄中建立一個檔案:main.box,編輯其內容為:
Dim httpd
Shell.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 Sub
Sub OnServiceStop()
httpd.Close
End Sub
Sub OnServicePause()
httpd.Stop
End Sub
Sub OnServiceResume()
httpd.Start
End Sub
上面的代碼摘自《建立一個 WEB 伺服器》。其中加粗的部分是預設檔案名稱,如果你的應用不同,可以自行添加修改。
二、複製 asp 應用
在目錄中再建立一個子目錄:wwwroot,將你在 iis 中的檔案全部複製到 wwwroot 中。此時,你的 netbox 運行環境應該已經準備好了。
三、測試回合
為了運行你剛才建立的 netbox 應用,你必須確認你的 iis 或者其他佔用 80 連接埠的程式已經停止,較大的可能是你的 iis 在使用這個連接埠,所以最好停止你的 iis,或者將 iis 的使用連接埠更換為其他連接埠。
在確保 iis 已經停止後,你便可以執行你的 netbox 應用了。雙擊 netbox.exe 檔,很快,你將在視窗右下角看見 netbox 的表徵圖。此時,netbox 已經正常運行了。你需要做的是使用 ie 訪問 http://localhost 測試你的 asp 應用是否也已經正常運行。一般情況下此時 asp 也已經完全正常運行了。
四、編譯
編譯的過程是簡單的,執行 nbdw.exe,此時你必須保證在相同目錄下面有相同版本的 netbox.exe。
點 Select Folder,找到剛才我們建立的目錄 d:websvr,點 Browser,設定要產生的執行檔案名稱,點 Build...,開始編譯。
成功嘍……
最後,我們得到了編譯成功的那個執行檔案,這個就是我們的最後目標。
註:netbox最新版的下載地址為:http://wwww.netbox.cn/download/netbox.zip