当前位置: 首页 > 图文教程 > 网络编程 > ASP > 编译asp应用程序成为exe文件

ASP
编写通用的asp防注入程序
vbs(asp)下的Function 语句
ASP中类Class相关内容的整理资料
字符批量替换程序asp服务器版
旁注-网站小助手旭方修改免杀asp版
用正则表达式写的HTML分离函数
asp中"无限流"分页程序代码
asp的一个日期格式化函数
asp中创建多级目录的两段代码
asp中去除内容HTML标签的三个function函数
chr(9)、chr(10)、chr(13)、chr(32)、chr(34)讲解
方便的大家admin及admin888 经过 md5加密后16位和32位代码
可用的ASP无重复数字随机函数, 数组实现, 并应用于随机显示记录集
asp动态级联菜单代码
ASP中经常使用的SQL语句与教程说明
实例分析之用ASP编程实现网络内容快速查找的代码
服务端 VBScript 与 JScript 几个相同特性的写法与示例
ASP 环境下 VBS 事件应用 示例代码
asp 之上传漏洞终结篇
asp中一段防SQL注入的通用脚本

ASP 中的 编译asp应用程序成为exe文件


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-08-14   浏览: 203 ::
收藏到网摘: n/a

使用 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...,开始编译。

成功喽……
最后,我们得到了编译成功的那个执行文件,这个就是我们的最后目标。