使用VB将ASP代码封装到DLL文件完整实例
2007-10-20 21:38
561 查看
用VB封装ASP,建立SayHello测试程序 1、打开VB6,新建ActiveX DLL 2、在工程引用中加入Microsoft Active Server Pages Object Library选择 3、填加代码如下: 'Code Start '声明部分 Private MyScriptingContext As ScriptingContext Private MyApplication As Application Private MyRequest As Request Private MyResponse As Response Private MyServer As Server Private MySession As Session '下面定义公用函数(在VB中访问ASP对象,即在VB中可以用MyApplication等同于ASP中的Application、MyRequest等同于ASP中的Request、 MyResponse等同于ASP中的Response、 MyServer等同于ASP中的Server、 MySession等同于ASP中的Session 使用) Public Sub OnStartPage(PassedScriptingContext As ScriptingContext) Set MyScriptingContext = PassedScriptingContext Set MyApplication = MyScriptingContext.Application Set MyRequest = MyScriptingContext.Request Set MyResponse = MyScriptingContext.Response Set MyServer = MyScriptingContext.Server Set MySession = MyScriptingContext.Session End Sub Public Sub OnEndPage() Set MyScriptingContext = Nothing Set MyApplication = Nothing Set MyRequest = Nothing Set MyResponse = Nothing Set MyServer = Nothing Set MySession = Nothing End Sub '建立自定义函数SayHello Public Sub SayHello() MyResponse.Write ("Hello World") End Sub 'Code End 4、将类名改为:HelloWorld 将工程名改为:TestVBCode 5、生成TestVBCode.DLL文件,并使用Windows运行注册组件命令Regsvr32 路径/TestVBCode.DLL注册后即可使用。(卸载组件命令为Regsvr32 /u 路径/TestVBCode.DLL) 6、建立Test.asp文件,代码如下 <% 'VB自建函数调用格式 'Set 对象名=Server.CreateObject("工程名.类名") '对象名.自建函数名 Set MyTestObj = Server.CreateObject("TestVBCode.HelloWorld") MyTestObj .SayHello %> 7、运行Test.asp文件结果显示如下: Hello World ================= 以上代码在VB6,Win2003下测试通过. |
声明部分:我们在调用自己的aplaction时,先要声明
OnStartPage部分:当ASP执行时就是在服务器上创建这些alacation
OnEndPage部分:当ASP执行完毕时消毁对象!
附:关闭和重启IIS来实现释放IIS调用的DLL文件,以修改它,否则提示"权限被拒绝!"
BAT文件:
@REM 重新启动IISADMIN服务,以便COM注册
@REM 停止IISADMIN服务
net stop iisadmin /y
@REM 启动IISADMIN服务
net start iisadmin
@REM 启动WWW服务
net start w3svc
@REM 启动FTP服务
net start msftpsvc
@REM net start smtpsvc
@REM net start nntpsvc
@REM pause...
相关文章推荐
- 使用VB将ASP代码封装到DLL文件完整实例
- 使用VB将ASP代码封装生成DLL文件
- C# winform 导出导入Excel/Doc 完整实例教程 使用Aspose.Cells.dll——第一篇
- VB封装DLL实例(三)
- 在vb中使用Iphlpapi.dll获取网络信息 第四章 第四节 实例二:探测到某个IP地址经过的路由列表
- 用VB来封装DLL加密ASP文件
- 用VB 6封装ASP代码, 制作DLL组件
- C# winform 导出导入Excel/Doc 完整实例教程 使用Aspose.Cells.dll——第一篇
- 用VB 6封装ASP代码, 制作DLL组件
- C# WinForm使用Aspose.Cells.dll 导出导入Excel/Doc 完整实例教程
- AspSocket.dll文件下载与asp代码实例
- 创建用于非Visual C++工具的DLL——VB调用C++ DLL为何必须使用def文件
- 在vb中使用Iphlpapi.dll获取网络信息 第四章 第四节 实例二:探测到某个IP地址经过的路由列表
- Silverlight实用窍门系列:22.Silverlight使用WebService调用C++,Delphi编写的DLL文件【实例源码下载】
- 用VB生成DLL封装ASP代码一个例子:连接access数据库等
- 包含别人的dll,然后我们用类库再次封装成dll的时候的注意事项;源文件与模块生成时的文件不同;创建调试信息文件 ··PDB时发生意外的错误,进程无法访问文件,因为另一个程序正在使用此文件
- 用VB 6封装ASP代码, 制作DLL组件
- [今天的编程日记, 在vb中使用vc编译的dll实例]
- [今天的编程日记, 在vb中使用vc编译的dll实例]
- 用VB生成DLL封装ASP代码,连接数据库- -