一、创建 asp 运行环境
首先创建一个空的目录,在你喜欢的位置,假设是 d:\web。在目录中创建一个文件: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 "index.asp"
host.adddefault "default.asp"
host.adddefault "index.htm"
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,将你的网站文件中的文件解压到 wwwroot 中。此时,你的 asp 运行环境应该已经准备好了。
三、测试运行
为了运行你刚才新建的 netbox 应用,你必须确认你的 iis 或者其他占用 80 端口的程序已经停止,较大的可能是你的 iis 在使用这个端口,所以最好停止你的 iis,或者将iis 的使用端口更换为其他端口。
在确保 iis 已经停止后,你便可以执行你的 netbox 应用了。双击 main.box 文件,很快,你将在窗口右下角看见 netbox 的图标。此时,netbox 已经正常运行了。你需要做的是使用 ie 访问 http://127.0.0.1 测试你的 asp 应用是否也已经正常运行。一般情况下此时 asp 也已经完全正常运行了。
(为了不重启,可将netbox.exe复制到asp程序目录下)
四、编译
编译的过程是简单的,执行 nbdw.exe。
点 select folder,找到刚才我们建立的目录 d:\websvr,点 browser,设定要生成的执行文件名,点 build...,开始编译。成功喽……
最后,我们得到了编译成功的那个执行文件,这个就是我们的最后目标。
因为这个例程是以服务方式创建的 web 服务器,所以你可以使用:myapp -install
将应用安装成为服务,这样,系统无须登录便可以自动运行应用了。如果需要卸载服务,则可以执行下面的命令:myapp -remove