用VB写ASP组件，怎么才能使用session和Application？

[zhgroup]

如题？

[zhgroup]

我实例化后，仍然不能用啊，显示变量未定义。
比如说用session("myip")=request.servervaribles("REMOTE_ADDR")
这个为什么不好使呢？

[dapha]

引用:

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