先将NETBOX安装。安装好之后进入下一步。

创建一个空目录，如D:\web（或随便什么目录都行，桌面下都行，但最好是空的，因为方便打包），然后在在目录中创建一个新文件，并命名为：main.box，修改其内容如下：

Dim httpd

Shell.Service.RunService “NBWeb”, “NetBox Web Server”, “NetBox Http Server Sample”

Sub OnServiceStart()

Set httpd = CreateObject(“NetBox.HttpServer”)

If httpd.Create(“”, 80) = 0 Then

Set host = httpd.AddHost(“”, “\web”)

host.EnableScript = true

host.AddDefault “index.htm”

host.AddDefault “index.html”

host.AddDefault “index.asp”

host.AddDefault “default.htm”

host.AddDefault “default.asp”

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

最后保存！

代码的主要内容：

httpd.Create(“”, 80)是指使用80端口开设服务器，如果不喜欢，可以更改为别的！那么访问地址后面必须加 :端口号 才能正常访问

Set host = httpd.AddHost(“”, “www”) 中的www就是你放网站程序的目录。也就是一定要与第二步将建立的目录名称相同！

host.AddDefault “index.htm”     –host.AddDefault “index.asp”

这些就是指设置默认首页文件，host.AddDefault “default.htm”

你可以自己更改，添加删除一行一个host.AddDefault “default.asp”

然后在D:\WEB下面创建一个名为 www 的目录，如：d:\web\www其下创建一个 index.asp 文件，编辑内容如下：

<%response.write “I Love You！”%>然后保存！

调试运行然后，我们双击运行 main.box，这时候，系统托盘处应该出现一个红色的 .b 样的小图标。

好，我们打开浏览器，地址栏输入：127.0.0.1，或 localhost 看看：如果出现了 I Love You！ ，说明成功了！

运行为服务因为这个例程是以服务方式创建的 Web 服务器，所以你可以使用：myapp -install将应用安装成为服务，这样，系统无须手动运行便可以自动运行了。

如果需要卸载服务，则可以执行下面的命令：myapp -remove 来删除服务

编译编译的过程是简单的，执行nbdw.exe（NetBox Deployment Wizard就是部署向导）。

1.点选择文件夹按钮，找到刚才我们建立的目录d:\web，

2.然后点浏览按钮，

3.输入要生成的执行文件的目录和名称，

4.点Build…，开始编译。