用VB写ASP组件,怎么才能使用session和Application?

zhgroup 2003-12-22 06:16:53
如题?
...全文
7 点赞 收藏 2
写回复
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
dapha 2003-12-23
引用:

x:\Winnt\System32\inetsrv\asp.dll

Public Sub OnStartPage(mysc As ScriptingContext)'页面Load自动执行
Dim username
Dim clsmain As New clsmain
startime = Timer()
Set Response = mysc.Response
Set Request = mysc.Request
Set session = mysc.session'实例后就能用了。
Set bbsconn = New ADODB.Connection
bbsconn.ConnectionString = CONN_SQL_STRING
bbsconn.Open
clsmain.maindata
clsmain.Nav
Call WriteMain
Set clsmain = Nothing
End Sub

Public Sub OnEndPage()
endtime = Timer
Response.Write "共耗时" & FormatNumber((endtime - startime) * 1000, 3) & "毫秒"
Set Response = Nothing
Set Request = Nothing
Set session = Nothing
Set bbsrs = Nothing
Set bbsconn = Nothing
End Sub
回复
zhgroup 2003-12-23
我实例化后,仍然不能用啊,显示变量未定义。
比如说用session("myip")=request.servervaribles("REMOTE_ADDR")
这个为什么不好使呢?
回复
发动态
发帖子
VB基础类
创建于2007-09-28

7450

社区成员

VB 基础类
申请成为版主
社区公告
暂无公告