I want to track some data from my visitors like :



- UserAgent

- Http_referer



I want to store this data in my database



I think it isn't possible to create objects in the global.asa ...

How can i solve this problem?



code in global.asa is :



<SCRIPT LANGUAGE="VBScript" RUNAT="Server">



dim strHttp_Referer, strHttp_Forwarded, strUser_Agent, strRemote_Addr, 

strRemote_Host, objVisitor



Sub Session_OnStart

         strHttp_Referer = "w" & Request.ServerVariables("HTTP_REFERER")

         strHttp_Forwarded = "w" 

&Request.ServerVariables("HTTP_X_FORWARDED_FOR")

         strUser_Agent = "w" &Request.ServerVariables("HTTP_USER_AGENT")

         strRemote_Addr = "w" &Request.ServerVariables("REMOTE_ADDR")

         strRemote_Host = "w" &Request.ServerVariables("REMOTE_HOST")



         set objVisitor = Server.CreateObject("olvEngine.Visitor")     --> 

my own component



         objVisitor.visit strRemote_Addr, 

strRemote_Host,strUser_Agent,strHttp_Referer,strHttp_Forwarded



         set objVisitor = nothing

End Sub



</SCRIPT>



Thx in Advance !



Bart Vandenheede

www.vandenheede.be

I woulld check out this article

(http://www.4guysfromrolla.com/webtech/021601-1.shtml) on the 4guys site. It

is titled, "Capturing Basic Site Statistics".



If you are looking for something a little more robust, you can check out:

http://www.2enetworx.com/dev/



There is a free open source stats application.



It is very easy to use and configure. I am currently using it on two

different sites with out any problems.



-Scott







-----Original Message-----

From: Bart Vandenheede [mailto:bvandenheede@i...]

Sent: Monday, March 19, 2001 12:31 PM

To: ASP Web HowTo

Subject: [asp_web_howto] User Tracking





I want to track some data from my visitors like :



- UserAgent

- Http_referer



I want to store this data in my database



I think it isn't possible to create objects in the global.asa ...

How can i solve this problem?



code in global.asa is :



<SCRIPT LANGUAGE="VBScript" RUNAT="Server">



dim strHttp_Referer, strHttp_Forwarded, strUser_Agent, strRemote_Addr, 

strRemote_Host, objVisitor



Sub Session_OnStart

         strHttp_Referer = "w" & Request.ServerVariables("HTTP_REFERER")

         strHttp_Forwarded = "w" 

&Request.ServerVariables("HTTP_X_FORWARDED_FOR")

         strUser_Agent = "w" &Request.ServerVariables("HTTP_USER_AGENT")

         strRemote_Addr = "w" &Request.ServerVariables("REMOTE_ADDR")

         strRemote_Host = "w" &Request.ServerVariables("REMOTE_HOST")



         set objVisitor = Server.CreateObject("olvEngine.Visitor")     --> 

my own component



         objVisitor.visit strRemote_Addr, 

strRemote_Host,strUser_Agent,strHttp_Referer,strHttp_Forwarded



         set objVisitor = nothing

End Sub



</SCRIPT>



Thx in Advance !



Bart Vandenheede

www.vandenheede.be