<% Option Explicit '########################################################### '## COPYRIGHT (C) 2002-2008, Metasun Software Corp. '## '## For licensing details, lease read the license.txt file '## included with MetaTraffic or located at: '## http://www.metasun.com/products/metatraffic/license.asp '## '## All copyright notices regarding MetaTraffic '## must remain intact in the scripts and in the '## outputted HTML. All text and logos with '## references to Metasun or MetaTraffic must '## remain visible when the pages are viewed on '## the internet or intranet. '## '## For support, please visit http://www.metasun.com '## and use the support forum. '########################################################### %> <% Dim strAboutClass, strScriptDir, strAction, blnExclude Dim intTracking : intTracking = Request.Querystring("t") strScriptDir = Request.Servervariables("script_name") strScriptDir = Left(strScriptDir, InStrRev(strScriptDir, "/")) If Request.Cookies("about") = "HIDE" Then strAboutClass = "Display: none;" End If Dim objReport : Set objReport = New MTReport With ObjReport .Database = aryMTDB .Config = aryMTConfig End With Call CreateDatabaseConnection(1) Dim blnAdmin : blnAdmin = Authenticate(False, aryMTDB(5)) strAction = Request.Form("action") Select Case strAction Case "Exclude Visits" Response.Cookies("mt_exclude") = 1 Response.Cookies("mt_exclude").Path = "/" Response.Cookies("mt_exclude").Expires = DateAdd("m", 24, Date()) Case "Include Visits" Response.Cookies("mt_exclude") = "" Response.Cookies("mt_exclude").Path = "/" End Select If Request.Cookies("mt_exclude") <> "" Then blnExclude = False Else blnExclude = True End If %> MetaTraffic
<% Response.Write objReport.SiteName %> <% Response.Write objReport.Version %>
Tracking
Overview
Web Pages
Downloads
Exclude Visits
<% If blnExclude = True Then %>

Your visits are being tracked.

If you have a dynamic IP address, click the button below to set a cookie that will exclude your visits from being tracked with this browser.

<% Else %>

Your visits are not being tracked.

This browser is currently being excluded from tracking. Click the button below to remove this.


<% End If %>
<% Select Case intTracking %> <% Case 1 %>
Web Pages

Javascript tracking provides a way to track any type of page including .htm, .html, .php, .aspx, .cfm, etc.

Code

Use the following code to track any web page:

The ideal spot to place your tracking code is at the bottom of each web page before the closing html tag (</html>). For the page title to be automatically inserted, you must place the tracking code after the </title> tag and there must be text in the title tag.

<% Case 2 %>
Active Server Pages (ASP)

Using ASP is the optimal way to track your web pages. It allows you to track robots accessing your web pages which javascript will not. The only limitation with using ASP tracking is that you will not collect screen area data from your visitors.

To track your .ASP files, add the following code to any .ASP page that you want to track:

You can also use a standard include in your asp pages like this:

<% Case 3 %>
Downloads

You can track files that aren't web pages by linking to them in a special way in your HTML page. This is useful for tracking downloads, media files, etc.

Here is an example of how to link to a file and track it:

Simply change the /downloads/somefile.zip to the path and name of the file you would like to track. You can use full URLs as well such as http://www.yourdomain.com/downloads/yourfile.zip.

<% Case Else '0 %>
Overview

To track activity on your web site, you will need to insert tracking code on each web page. There are two ways to track your web content:

  • Web Pages - Track activity on your web pages using Javascript inserted into each page
  • Downloads - Track downloads or multimedia files using a simple redirect

To setup web site tracking, follow these steps:

  1. Choose a tracking method based on the type of file you are tracking
  2. Copy the code and paste it into your web pages
<% End Select %>
<% Response.Write ShowProductInfo() %>
© Copyright 2008, Metasun Software
 
<% Set objReport = Nothing Call CloseDatabaseConnection() %>