<%@ LANGUAGE="VBSCRIPT" %> <% Option Explicit %> <% '/** ' * ASP Stats Generator - Powerful and reliable ASP website counter ' * ' * This file is part of the ASP Stats Generator package. ' * (c) 2003-2008 Simone Carletti , All Rights Reserved ' * ' * ' * COPYRIGHT AND LICENSE NOTICE ' * ' * The License allows you to download, install and use one or more free copies of this program ' * for private, public or commercial use. ' * ' * You may not sell, repackage, redistribute or modify any part of the code or application, ' * or represent it as being your own work without written permission from the author. ' * You can however modify source code (at your own risk) to adapt it to your specific needs ' * or to integrate it into your site. ' * ' * All links and information about the copyright MUST remain unchanged; ' * you can modify or remove them only if expressly permitted. ' * In particular the license allows you to change the application logo with a personal one, ' * but it's absolutly denied to remove copyright information, ' * including, but not limited to, footer credits, inline credits metadata and HTML credits comments. ' * ' * For the full copyright and license information, please view the LICENSE.htm ' * file that was distributed with this source code. ' * ' * Removal or modification of this copyright notice will violate the license contract. ' * ' * ' * @category ASP Stats Generator ' * @package ASP Stats Generator ' * @author Simone Carletti ' * @copyright 2003-2008 Simone Carletti ' * @license http://www.weppos.com/asg/en/license.asp ' * @version SVN: $Id: stats_js.asp 106 2008-04-13 17:57:38Z weppos $ ' */ '/* ' * Any disagreement of this license behaves the removal of rights to use this application. ' * Licensor reserve the right to bring legal action in the event of a violation of this Agreement. ' */ ' Tracking file Response.Write "var file = '" & asgTrackFilePath & "';" ' Referer Response.Write "var f = escape(document.referrer);" ' Current page Response.Write "var u = escape(document.URL); " ' Video resolution Response.Write "var w = screen.width; " Response.Write "var h = screen.height; " ' Color depth according to browser type Response.Write "var v = navigator.appName; " Response.Write "var c = ''; " Response.Write "if (v != 'Netscape') { c = screen.colorDepth; }" Response.Write "else { c = screen.pixelDepth; }" ' Tracking string Response.Write "info='w=' + w + '&h=' + h + '&c=' + c + '&r=' + f + '&u=' + u;" ' Write image Response.Write "document.open();" Response.Write "document.write('');" Response.Write "document.close();" %>