使用NetBox實現ASP網頁封裝為EXE教程

簡單的形容就是把ASP文件打包 成一個EXE文件，並且不需要在調試的機器上安裝IIS即可正常調試。如果按照說明書來操作的話，觀看比較繁瑣，本人為方便大家使用，現制作一個簡單的使用教程。 

 

封裝過程

1、首先安裝NetBox,安裝時全部是英文界面，默認安裝。
2、安裝完畢后運行桌面上的NetBox Deployment Wizard快捷方式
3、打開時有個提示框，是選擇軟件語言類型的，在此處選擇為簡體中文，點確定即可。軟件界面：
4、准備步驟：
    4.1、安裝IIS； 
    4.2、在D盤根目錄下建立111文件夾（其實在哪個盤符下建立都可以，我是個人喜好。呵呵，您也可以根據自己的喜好變換位置。）； 
    4.3、將C盤Inetpub文件夾下的wwwroot文件夾（包含里面9個原始文件）一同拷貝至D盤111文件夾下； 
    4.4、把需要封裝的ASP文件拷貝至D盤111文件夾下的wwwroot文件夾內（是拷貝至wwwroot文件夾內哦）； 
    4.5、在D盤111文件夾內新建一個文本文檔，將以下內容拷貝進去： 
（代碼開始，這一行不用拷貝）
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"
Shell.Execute """C:/Program Files/Internet Explorer/IEXPLORE.EXE""http://127.0.0.1/"
         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
（代碼結束，這一行不用拷貝）
將以上代碼拷貝后把新建文本文檔.txt更名為：main.box


代碼說明：
host.AddDefault "default.asp"  //首頁文件如果為index.asp即更換為index.asp
host.AddDefault "default.htm"  //首頁文件如果為index.asp即更換為index.asp


Shell.Execute """C:/Program Files/Internet Explorer/IEXPLORE.EXE"" http://127.0.0.1/"  //這一行是我后加上去的。主要意思是自動使用IE瀏覽器打開127.0.0.1頁面。如果您不想自動打開，您也可以去掉。


If httpd.Create("", 80) = 0 Then   //80是指80端口 不推薦更改。
         Set host = httpd.AddHost( "","/wwwroot")  //wwwroot是指111文件夾下wwwroot文件夾名稱


5、開始封裝：
5.1、打開桌面上的NetBox Deployment Wizard快捷方式；
5.2、單擊選擇文件夾選中D盤下的111文件夾；
5.3、單擊瀏覽選擇輸出文件保存名稱及路徑，之后直接點擊Build即可自動生成EXE文件；   
5.4、生成后即可運行，安裝過IIS的朋友如果使用的是80端口的話要記得在運行程序之前要現停止IIS服務器才可以運行生成的EXE程序。

 http://files.cnblogs.com/files/mingjing/nbsetup.rar