日期:2009-10-28  浏览次数:20796 次

在网易虚拟社区的“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

的初始化。

经实践证明,完全可行。