<% @ Language=VBScript %> <% Option Explicit %> <% '**************************************************************************************** '** Copyright Notice '** '** EzASPSite™ '** '** Copyright 2003-2005 VSBrown All Rights Reserved. '** '** This program is free software; you can modify (at your own risk) any part of it '** and use it both privately and commercially. '** '** All copyright notices must remain in tacked in the scripts and the '** outputted HTML. '** '** You may use parts of this program in your own private work, but you may NOT '** redistribute, repackage, or sell the whole or any part of this program even '** if it is modified or reverse engineered in whole or in part without express '** permission from the author. '** '** You may not pass the whole or any part of this application off as your own work. '** '** All links to EzASPSite™ and Powered By EzASPSite™ link must remain unchanged and in place '** and must remain visible when the pages are viewed unless permission is first granted '** by the copyright holder. '** '** This program is distributed in the hope that it will be useful, '** but WITHOUT ANY WARRANTY; without even the implied warranty of '** MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE OR ANY OTHER '** WARRANTIES WHETHER EXPRESSED OR IMPLIED. '** '** No official support is available for EzASPSite™ but you may post support questions at: '** http://www.ezaspsite.com/forum '** '**************************************************************************************** '===============Hit Counter=============== 'Dimenstion Variables Dim strDatabasePath 'Initialise the path to the access database if inside another folder strDatabasePath = ("") 'Call the sub procedure to increment the hit counters Call IncrementHitCount(strDatabasePath) '===============Hit Counter=============== %> <% response.write sitetitle %> <% Dim str3Column str3Column = homepage_3 %> <% If roundview = "On" Then %>
<% Else %> <% End If %>
<% If pagetitles = "On" Then %>   <% response.write pagedefaulttitle %>:<% Else %> <% End If %>

<%= homepage %>
<% If roundview = "On" Then %>
<% Else %> <% End If %> <% If blnLCode1 = False Then %> <% End If %>