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

ASP
asp实现取得数组中的最大值的代码
asp 将日期格式化为需要的格式
asp 下产生任意位数随机密码的代码
asp下返回以千分位显示数字格式化的数值
asp重定向页面的方法总结
asp下去除数组中重复的项的方法
asp下实现 重新排序数字数组的代码
asp 验证输入网址是否有效并可以访问 与正则验证输入网址
asp验证Ip格式的函数
asp实现生成由数字,大写字母,小写字母指定位数的随机数
asp 格式化sql中的like字符串
asp 实现显示所有的服务器变量值的函数
asp 取得用户真实IP,对代理地址仍然有效的函数
asp 通用数据库连接过程函数
asp 字符串截取函数
asp下实现格式化文件大小以MB显示的函数
asp 下用正则表达式检测邮箱格式的函数
asp 实现检测字符串是否为纯字母和数字组合的函数
asp代码实现检测组件是否安装的函数
asp通过JMAIL实现通用发送函数

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 223 ::
收藏到网摘: 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
的初始化。
经实践证明,完全可行。