netbox 如何打包?

来源:百度知道 编辑:UC知道 时间:2024/06/01 07:13:10
net box 压缩的软件。请问该如何打包?
我想知道已压缩文件,如何解包!!!!!

新建一个box(work.box)文件内容如下其中端口8080可以改。work文件夹可以改名为你的网站的所在的文件夹名(这个文件夹下最好不要再有别的asp程序或网站了)

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("", 8080) = 0 Then
Set host = httpd.AddHost("", "/work")

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

然后将这个work.box拷到和你的网站文件夹所在的那个父文件夹下(意思就是说work.box和你的网站文件夹wo