create ref to
Microsoft Active Server Pages Object Library

Option Explicit

'----- DECLARE ASP OBJECTS
Dim MyScriptingContext As ScriptingContext
Dim MyRequest As Request
Dim MyApplication As Application
Dim MyResponse As Response
Dim MyServer As Server
Dim MySession As Session

'----- DECLARE MY CLASSES
Dim gl As getLabels
Dim utl As utils

Public Sub OnStartPage(PassedScriptingContext As ScriptingContext)

��� '----- CREATE ASP OBJECTS
��� Set MyScriptingContext = PassedScriptingContext
��� Set MyRequest = MyScriptingContext.Request

��� Set MyApplication = MyScriptingContext.Application
��� Set MyResponse = MyScriptingContext.Response
��� Set MyServer = MyScriptingContext.Server
��� Set MySession = MyScriptingContext.Session

End Sub

Public Sub OnEndPage()
��� Set MyScriptingContext = Nothing
��� Set MyApplication = Nothing
��� Set MyRequest = Nothing
��� Set MyResponse = Nothing
��� Set MyServer = Nothing
��� Set MySession = Nothing
End Sub

Hosted by www.Geocities.ws

1