<% Dim varDiagnostics ' Display diagnostics? varDiagnostics = "N" Dim varThisURL ' Relative URL of this page Const conSrvrArchtech = "archtech.wellsfargo.com" Dim passCaller ' Calling page's ID Dim passCatg ' Chosen sector or category ' *** ************************** *** ' *** NEEDED FOR HITCOUNT: *** ' *** sub1000GetSrvrVarbls *** ' *** sub7000Count *** ' *** sub7300AddCount *** ' *** sub8000Diagnostics *** ' *** Plus the following Dims *** ' *** ************************** *** Dim varServer ' Which server am I addressing? Dim varDSNcurr ' ODBC DSN for driver database Dim varTblNameCurr ' Table-name within database Const conDSNprod = "dsn=kmteam" Const conDSNtest = "dsn=lehuan.siteadmin" 'Const conDSNold = "dsn=lehuan.sitedriver" Const conTblNameProd = "Tbl_Domain_Driver" Const conTblNameTest = "Tbl_Domain_Driver" varDSNcurr = conDSNprod varTblNameCurr = conTblNameProd Dim objRSd ' dbase object: URLs table Dim varSite ' dbase: Site Dim varCount ' dbase: Hitcount Dim varDateHit ' dbase: Date_Latest_Hit Dim varOriginHit ' dbase: Origin_Latest_Hit Dim varHostHit ' dbase: Origin_Latest_Hit Dim varSQLtext_d ' SQL statements for objRSd varSite = "gateway" Dim adCmdText ' Text for dbase command type adCmdText = 1 Dim varNbrHits ' How many hits Dim varMaster varMaster = "Master" ' *** ******************** *** ' *** END HITCOUNT. *** ' *** ******************** *** Const conNullFlag = "@" ' flag to remember field is null ' *** ****************************************************** *** ' *** *** ' *** S T A R T P R O G R A M: *** ' *** *** ' *** ****************************************************** *** 'sub1000GetSrvrVarbls() ' Get server variables 'sub1100SrvrSchema() ' Identify host and set parms %>
Alahula: the loved and welcoming path
Special Feature:  LehuaNet Downloadables
Plockton and the west coast highlands
Web building tutorial for technophobes

What does fankle mean? or glaiket? Leisure Marine seal trips in the Scottish Highlands
Site featured on BBC's
WebWise

Crocker National Bank CNB alumni events and roster
Cancer Fighters: medical links and cancer resources

Other Worlds: Ultimate travel utilities and guides
Pacifica coastLINE country western line dancing on Coastside

Manhattan photo gallery 2001 Go to Big Island 2002 Photo Gallery
     

 
Special People

David   Kaikea

Kevin
Surf Lounge / OPB

Go to Lehua's Refuge -- Luakaha: a pleasant place to while away time with loved friends   New photo in Lehua's Refuge: Early dance trophyPhoto: Doug & Lehua: early dance trophy




 
 

Site by LehuaNet® 1996-2004
©Graphics, backgrounds & images by LehuaNet®
(unless otherwise noted)

 

All rights reserved.  For permissions,
eMail LehuaNet
®

Updated 30-Jul-2006
 

 

Lotus swf #1
Celebrate Change #1