ASP in a Nutshell, 2nd Edition

Example

<SCRIPT LANGUAGE = VBScript RUNAT SERVER>
' The following code uses the Server object's 
' CreateObject method to instantiate a Counters 
' component in the Application_OnStart event 
' in the GLOBAL.ASA file.

Sub Application_OnStart
   Dim objCounter

   Set objCounter = Server.CreateObject("MSWC.Counters")
End Sub
</SCRIPT>

For more detail on the use of the CreateObject method, see its entry in Chapter 9.