当前位置: 首页 > 图文教程 > 网络编程 > ASP > 已调试好的asp程序在VB中转换为组件的技巧

ASP
asp OpenTextFile文本读取与写入实例代码
在ASP编程中nothing代表什么意思?
asp之让Session永不过期
ASP获取ACCESS数据库表名及结构的代码
推荐一篇不错的新手asp编程的基本法则
最简洁的asp多重查询的解决方案
ASP 判断是否有中文的代码
asp.net常用函数收藏
asp下几种常用排序算法
asp获取数据库中表名和字段名的代码
简单的asp采集代码教程
asp生成带有样式的word文件方法
实用301转向到另一域名相应页面的asp代码
asp伪继承初探_实例代码
asp代理采集的核心函数代码
js table排序类代码
ASP UTF-8页面乱码+GB2312转UTF-8 +生成UTF-8格式的文件(编码)
Asp生成RSS的类_给网站加上RSS
utf-8 网页不显示+utf-8网页乱码的通用解决方法
asp截取指定英汉混合字符串_支持中文

ASP 中的 已调试好的asp程序在VB中转换为组件的技巧


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

  作者
Heatch

      在网易虚拟社区的“VB和Basic区”里有一篇《使用VB编写纯ASP程序 [转][Technology] 》,其实我认为最好的方法应该这样:
原文中的定义如下:

Dim m_objResponse As Response

    其实对于我们写过.dll的来说,并不是很好,就是如果要将该程序拿到.asp程序中进行调试时,尤其是我们将已经调试通过的.asp程序做成.dll时,.asp程序里用的是标准的组件名。默认的组件名为response、request等,引文中在前面加上了m_obj,则如果程序中用到了这句,则也要进行相应的改变,这一则会带来较大的工作量,二则对于程序的可读性并没有什么改进。因此,最好的方法是如下定义:
Dim Context As ObjectContext
Dim Server As Server
Dim Request As Request
Dim Session As Session
Dim Response As Response

当然,后面还要有
Private Sub Class_Initialize()
Set Context = GetObjectContext()
Set Server = Context("Server")
Set Request = Context("Request")
Set Response = Context("Response")
Set Session = Context("Session")
End Sub
的初始化。
经实践证明,完全可行。