Google Tracker for ASP

SEO Chat Forums Sponsor:

March 4th, 2003, 05:25 PM

Sentient

Contributing User

Join Date: Mar 2003

Location: San Diego

Posts: 55

Time spent in forums: 6 h 11 m 33 sec
Reputation Power: 8

Google Tracker for ASP

Darrin inspired me to write a google tracker for ASP, since I couldn't get the perl to work at my host. Anyone have a need for this or have any feature requests? Currently it just tracks the type of bot (fresh or deep crawl) and the time of the visit, and displays the results in the list. Right now I'm storing the visits in SQL serverver, but could easily adapt it to MS Access or write to a text file.

Also, I'm brand new to seo, and have yet to catch a live freshbot at my site.. What do I do with it once I catch it?

Thanks for the great forum!

Christopher

__________________
commercehelper.com

March 4th, 2003, 06:04 PM

digitalirony

Contributing User

Join Date: Feb 2003

Location: London

Posts: 122

Time spent in forums: < 1 sec
Reputation Power: 8

Quote:

have yet to catch a live freshbot at my site.. What do I do with it once I catch it?

If you catch a live freshbot, weight it, take a photo, and release it so that it can visit other sites (and tell its friends about yours). If your really lucky, the big mama - deepbot - will come along to see what all the fuss has been about

March 4th, 2003, 06:08 PM

Sentient

Contributing User

Join Date: Mar 2003

Location: San Diego

Posts: 55

Time spent in forums: 6 h 11 m 33 sec
Reputation Power: 8

Quote:

If you catch a live freshbot, weight it, take a photo, and release it so that it can visit other sites (and tell its friends about yours).

I hear they're great battered and fried!

March 4th, 2003, 06:42 PM

Darrin Ward

Founder, SEOChat.com :)

Join Date: Dec 2002

Location: Miami, Florida

Posts: 1,453

Time spent in forums: 21 h 5 m 4 sec
Reputation Power: 20

Re: Google Tracker for ASP

Quote:

Originally posted by "Sentient"

Darrin inspired me to write a google tracker for ASP

So I'm inspiring people now?? Sorry to hear the perl script didn't work on your server. It is unfortunately something that is hard to include in already dynamic page such as php & asp.

__________________
Darrin J. Ward, the Original Founder of SEO Chat (this site), Google Dance Tool & some other cool stuff! Read my: Professional SEO Site or Twitter: @DarrinJWard.

March 4th, 2003, 06:54 PM

John

Contributing User

Join Date: Feb 2003

Posts: 128

Time spent in forums: 5 h 27 m 55 sec
Reputation Power: 8

Hey, I could use something like that for my site. Would definitely beat using the 'find next' in notepad

March 4th, 2003, 07:36 PM

Sentient

Contributing User

Join Date: Mar 2003

Location: San Diego

Posts: 55

Time spent in forums: 6 h 11 m 33 sec
Reputation Power: 8

source code

Quote:

Sorry to hear the perl script didn't work on your server

My hosting company has active perl and it never works as well as stardard cgi perl... anyhow, here is the core source-code for script I wrote:

Quote:

<%
Dim UserAgent, RemoteHost, RemoteAddr, BOT, BotType, gbDomainRequested, gbFullDomainName, gbPage

'Clean up the url and domain name
gbDomainRequested = LCase(Request.ServerVariables("SERVER_NAME"))
gbDomainRequested = Replace(gbDomainRequested, "www.", "")
gbFullDomainName = gbDomainRequested
gbDomainRequested = Replace(gbDomainRequested, ".com", "")
gbDomainRequested = Replace(gbDomainRequested, ".net", "")
gbDomainRequested = Replace(gbDomainRequested, ".org", "")
gbDomainRequested = Replace(gbDomainRequested, ".biz", "")
gbDomainRequested = Replace(gbDomainRequested, ".info", "")

gbPage = Replace(Request.ServerVariables("URL"), gbDirectoryName, "")

'grab the visitor
UserAgent = Request.ServerVariables("HTTP_USER_AGENT")
RemoteHost = Request.ServerVariables("REMOTE_HOST")
RemoteAddr = Request.ServerVariables("REMOTE_ADDR")

'Use to simulate a visit
'UserAgent = "Googlebot"
'RemoteHost = ".googlebot.com"
'RemoteAddr = "216."

BOT = False

'Is it the googlebot?
If InStr(UserAgent, "Googlebot") > 0 Then BOT = True
If InStr(RemoteHost, ".googlebot.com") > 0 Then BOT = True

If BOT = True Then
'Hooray!

'If so, which bot is it?
If Left(RemoteAddr, 4) = "216." Then
BotType = "Deep Bot"
Else
BotType = "FreshBot"
End If

'Record the vist!
set Tracker = Server.CreateObject("ADODB.Recordset")
Tracker.ActiveConnection = MM_CommerceHelper_STRING
Tracker.Source = "SELECT * FROM GoogleTracker"
Tracker.CursorType = 2
Tracker.CursorLocation = 3
Tracker.LockType = 3
Tracker.Open()
Tracker.AddNew()
Tracker.Fields("DomainName") = gbFullDomainName
Tracker.Fields("Page") = gbPage
Tracker.Fields("BotType") = BotType
Tracker.Update()
Tracker.Close()

End If
%>

Just include this file on each page you want to track (), record and display the visit how you wish. It will display the domain name, page file name, time of visit, and type of bot!

March 5th, 2003, 01:37 AM

John

Contributing User

Join Date: Feb 2003

Posts: 128

Time spent in forums: 5 h 27 m 55 sec
Reputation Power: 8

I'm not real clear on how I would implement this but I'll have my developer take a look.

Thanks!!

March 5th, 2003, 02:18 PM

Darrin Ward

Founder, SEOChat.com :)

Join Date: Dec 2002

Location: Miami, Florida

Posts: 1,453

Time spent in forums: 21 h 5 m 4 sec
Reputation Power: 20

I use activestate Perl on my local machine (Windows XP). I wrote the code on this machine and it worked fine with activestate, perhaps it's a different version of type!!

March 11th, 2003, 01:38 PM

Sentient

Contributing User

Join Date: Mar 2003

Location: San Diego

Posts: 55

Time spent in forums: 6 h 11 m 33 sec
Reputation Power: 8

Here is how I am displaying the results (now that I have some)

http://www.commercehelper.com/admin...oogleReader.asp

Viewing: SEO Chat Forums > Google > Google Optimization > Google Tracker for ASP

« Previous Thread | Next Thread »

Thread Tools	Search this Thread
Email this Page	Search this Thread: Advanced Search
Display Modes	Rate This Thread
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode	Rate This Thread:

Posting Rules
You may not post new threads You may not post replies You may not post attachments You may not edit your posts vB code is On Smilies are On [IMG] code is On HTML code is Off

View Your Warnings | New Posts | Latest News | Latest Threads | Shoutbox

Forum Jump

Free IT White Papers!

Create the Optimal Architecture for your Critical Applications
Warburton's the largest independently owned bakery in the UK faced a number of difficult challenges in providing the most robust yet efficient IT infrastructure for their organization's success. IBM's services combined with their xSeries servers created the perfect platform for their SAP environment with sufficient flexibility, and did so in very time effective fashion.
Request Your Free Technology Downloads!

Five Best Practices for Deploying a Successful Service-Oriented Architecture
This white paper describes the benefits you can expect with SOA, and how IBM can help take your business there.
Request Your Free Technology Downloads!

Gartner Magic Quadrant for Application Delivery Controllers
Gartner summarizes its view on Application Delivery Controllers, evaluates strengths and weaknesses of solutions, and provides Magic Quadrant reporting for a quick comparison across all vendors. Learn from Gartner how you can benefit from an all-in-one device like Citrix NetScaler that delivers the highest levels of availability, performance and security.
Request Your Free Technology Downloads!

Knowledge is Power
What you don't know can hurt you, and is likely costing you money and increasing your security risks during an era of scarce resources. This white paper proposes six key strategies that enterprise security managers can use to improve their network defense posture.
Request Your Free Technology Downloads!

Rationalizing the Multi-Tool Environment
The rationalized multi-tool approach is flexible, scalable and cost effective. It provides the necessary input to the IT service management business processes. It preserves prior investments in monitoring tools, empowers technologists to select the best tools with which to do their jobs, and enhances effective response to incidents.
Request Your Free Technology Downloads!

More Free IT White Papers!