MSIE+7.0;+Windows+NT+5.1;+.NET+CLR+1.1.4322;+MSN+6.1;+MSNbMSFT;+MSNmen-us;+MSNc00;+v5m) http://ac3.msn.com/de.ashx?adunitid=379&v=pubm7&w=300&h=250&url=http%3A//cityguides.msn.com/restaurants/browse.aspx%3Fcategory%3D86%26where%3Dfortlauderdalefl&lmt=1214886995&tz=240&cc=100&dt=1214886995953&uh=960&uw=1280&uah=930&uaw=1280&cd=32&ja=true&app=Microsoft%20Internet%20Explorer&his=20&plf=Win32 200 0 2726 595 125
2008-07-01 04:36:44 GET /images/bg.gif - 24.26.17.195 Mozilla/4.0+(compatible;+MSIE+7.0;+Windows+NT+5.1;+.NET+CLR+1.1.4322;+MSN+6.1;+MSNbMSFT;+MSNmen-us;+MSNc00;+v5m) http://www.scarcellasgrill.com/ 200 0 315 336 93
2008-07-01 04:36:44 GET /images/leftbg.gif - 24.26.17.195 Mozilla/4.0+(compatible;+MSIE+7.0;+Windows+NT+5.1;+.NET+CLR+1.1.4322;+MSN+6.1;+MSNbMSFT;+MSNmen-us;+MSNc00;+v5m) http://www.scarcellasgrill.com/ 200 0 574 340 93
2008-07-01 04:36:44 GET /images/rightbg.gif - 24.26.17.195 Mozilla/4.0+(compatible;+MSIE+7.0;+Windows+NT+5.1;+.NET+CLR+1.1.4322;+MSN+6.1;+MSNbMSFT;+MSNmen-us;+MSNc00;+v5m) http://www.scarcellasgrill.com/ 200 0 573 341 265
2008-07-01 04:36:45 GET /template3001.swf - 24.26.17.195 Mozilla/4.0+(compatible;+MSIE+7.0;+Windows+NT+5.1;+.NET+CLR+1.1.4322;+MSN+6.1;+MSNbMSFT;+MSNmen-us;+MSNc0z;+v5m) http://www.scarcellasgrill.com/ 200 0 219427 367 1046
2008-07-01 04:36:46 GET /swf_content/1.swf - 24.26.17.195 Mozilla/4.0+(compatible;+MSIE+7.0;+Windows+NT+5.1;+.NET+CLR+1.1.4322;+MSN+6.1;+MSNbMSFT;+MSNmen-us;+MSNc0z;+v5m) http://www.scarcellasgrill.com/template3001.swf 200 0 106701 384 609
2008-07-01 04:36:56 GET /swf_content/2.swf - 24.26.17.195 Mozilla/4.0+(compatible;+MSIE+7.0;+Windows+NT+5.1;+.NET+CLR+1.1.4322;+MSN+6.1;+MSNbMSFT;+MSNmen-us;+MSNc0z;+v5m) http://www.scarcellasgrill.com/swf_content/1.swf 200 0 14848 385 109
2008-07-01 04:52:17 GET /robots.txt - 65.55.209.146 msnbot/1.1+(+http://search.msn.com/msnbot.htm) - 404 0 0 214 109
2008-07-01 04:52:17 GET /index.asp - 65.55.209.146 msnbot/1.1+(+http://search.msn.com/msnbot.htm) - 200 0 2745 277 93
enuItem("Clean Air Tent","location='Clean_air_tent.htm'");
mm_menu_0118164832_0_1.addMenuItem("Garment Storage Cabinet","location='garment_storage.htm'");
mm_menu_0118164832_0_1.addMenuItem("Air Curtains","location='air_curtains.htm'");
mm_menu_0118164832_0_1.addMenuItem("Fumes Hoods","location='fume_hood.htm'");
mm_menu_0118164832_0_1.addMenuItem("Pass Box","location='pass_box.htm'");
mm_menu_0118164832_0_1.addMenuItem("Dispensing Booth / Sampling Booth","location='clean_booth.htm'");
mm_menu_0118164832_0_1.addMenuItem("Portable Hanging","location='portable_hang.htm'");
mm_menu_0118164832_0_1.hideOnMouseOut=true;
mm_menu_0118164832_0_1.bgColor='#FFFFFF';
mm_menu_0118164832_0_1.menuBorder=1;
mm_menu_0118164832_0_1.menuLiteBgColor='#FFFFFF';
mm_menu_0118164832_0_1.menuBorderBgColor='#CCCCCC';
window.mm_menu_0118164832_0_2_1 = new Menu("Air Filters",137,16,"Tahoma",10,"#FFFFFF","#FFFFFF","#919FB5","#000084","left","middle",3,0,1000,-5,7,true,true,true,0,true,true);
mm_menu_0118164832_0_2_1.addMenuItem("Hepa Filter (Stand)","location='airfilter_hepa.htm'");
mm_menu_0118164832_0_2_1.addMenuItem("Hepa Filter(Mini)","location='airfilter_hepa mini.htm'");
mm_menu_0118164832_0_2_1.addMenuItem("Pre Filters","location='airfilter_prefilter.htm'");
mm_menu_0118164832_0_2_1.addMenuItem("Fine Filters","location='airfilter_fine.htm'");
mm_menu_0118164832_0_2_1.addMenuItem("Bag Filter","location='airfilter_bag.htm'");
mm_menu_0118164832_0_2_1.addMenuItem("Roll-O-Matic","location='airfilter_rolluatic.htm'");
mm_menu_0118164832_0_2_1.addMenuItem("Oil-O-Matic","location='airfilter_oil omatic.htm'");
mm_menu_0118164832_0_2_1.addMenuItem("Pulse Jet Filters","location='airfilter_PULSEJET.htm'");
mm_menu_0118164832_0_2_1.addMenuItem("Semi Absolute","location='airfilter_semiabsulate.htm'");
mm/tr>
LCID 1033 Format - Date
<%=formatDateTime(now(),vbShortDate)%>
Product Image Directory
<%=pImagesDir%>
Download Directory
<%=pDownloadDir%>
Import / Export Directory
<%=pImportDir%>
HTTP Scripts Directory
<%=urlNonSSL%>
HTTPS Scripts Directory
<%=urlSSL%>
MDAC Version
<%=cn.Version%>
Database connection string
<%=cn.connectionstring%>
Database type set
<%if dbtype = 0 then response.write "Access" else response.write "MS SQL"%>
Database Provider
<%=cn.provider%>
<%
'Close database
call closedb()
%>CSUM (b3q SPAD ö ä FILE ¨ 8= e † 2 t úU V«@^è¼P ^è¼P4 Q X D V _ c o n f i g . a s p € D V _ C O N ~ 1 . A S P NACL Œ £
„ $ @ ¯Z]Zg„\ŸÅûâq L ÿ ÿ © ! CSUM Ò35 STAN 8=
'<%@ Language=VBScript %>
<%
'*************************************************************************
' DO NOT MODIFY THIS SCRIPT IF YOU WANT UPDATES TO WORK!
' Function : Store Parameter Maintenance
' Product : Shopping Tree Store Administration
' Version : 3.3
' Modified : January 2005
' Copyright: Copyright (C) 2004 Shopping Tree.Com
' See "license.txt" for this product for details regarding
' licensing, usage, disclaimers, distribution and general
' copyright requirements. If you don't have a copy of this
' file, you may request one at webmaster@ShoppingTree.com
'*************************************************************************
Option explicit
Response.Buffer = true
const adminLevel = 0
%>
<%
'Database
dim mySQL, rs
'StoreAdmin
dim idConfig
dim adminType
dim configVarType
dim configVar
dim configValue
dim configValLong
dim configHelp
dim configValidation
'Work Fields
dim I
dim item
dim count
dim totalPages
dim showArr
dim sortField
dim curPage
dim showPhrase
dim showField
dim showStart
dim showActive
dim showHome
dim showSpecial
dim showShip
dim showReview
dim showCat
dim pageSize
'*************************************************************************
'Open Database Connection
call openDB()
'Store Configuration
if loadConfig() = false then
response.redirect "sysMsg.asp?errMsg=" & server.URLEncode("Could not load Store Configuration settings.")
end if
'Set Row Colors
dim rowColor, col1, col2
col1 = "#DDDDDD"
col2 = "#EEEEEE"
'Set Number of Items per Page
pageSize = 50
'Get Page to show
curPage = Request.Form("curPage") 'Form
if len(curPage) = 0 then
curPage = Request.QueryString("curPage") 'QueryString
end if
'Get showField
showField = Request.Form("showField") 'Form
if len(showField) = 0 then
showField = Request.QueryString("showField") 'QueryString
end if
'Get showStart
showStart = Request.Form("showStart") 'Form
if len(showStart) = 0 then
showStart = Request.QueryString("showStart") 'QueryString
end if
'Get showPhrase
showPhrase = Request.Form("showPhrase") 'Form
if len(showPhrase) = 0 then
showPhrase = Request.QueryString("showPhrase") 'QueryString
end if
'Get showActive
showActive = Request.Form("showActive") 'Form
'Check if a Cookie Reset was requested
if Request.QueryString("resetCookie") = "1" then
Response.Cookies("ConfigSearch").expires = Date() - 30
else
'Check if a Cookie Recall was requested
if Request.QueryString("recallCookie") = "1" then
for each item in Request.Cookies
if item = "ConfigSearch" then
showArr = Split(Request.Cookies(item),"*|*")
curPage = showArr(0)
showField = showArr(2)
showStart = showArr(3)
showPhrase = showArr(4)
end if
next
else
'Save Search Criteria in a Cookie
Response.Cookies("ConfigSearch") = navCookie(curPage)
Response.Cookies("ConfigSearch").expires = Date() + 30
end if
end if
'After attempting to retrieve the search criteria through the various
'mechanisms above (Form/QueryString/Cookie), check that some of the
'critical values are valid. If not, set to default values.
if len(curPage) = 0 or not isNumeric(curPage) then
curPage = 1
else
curPage = CLng(curPage)
end if
if len(showField) = 0 then
showField = "configVar"
end if
'Check what we will be sorting the results on
sortField = Request.Form("sortField") 'Form
if len(sortField) = 0 then
sortField = Request.QueryString("sortField") 'QueryString
end if
if len(sortField) = 0 then
sortField = "configVar"
end if
%>
Configuration Variables
<%
if len(request.QueryString("msg")) > 0 then
%>
<%=request.QueryString("msg")%>
<%
end if
%>
<%
'Specify fields and table
mySQL="SELECT idConfig,adminType,configVarType,configVar,configVal,configValLong,configHelp,configValidation " _
& "FROM storeadmin a " _
& "WHERE adminType <> 'S' " 'Dummy check to set up conditional checks below
'Field Start
if len(showStart) > 0 then
mySQL = mySQL & "AND " & showField & " LIKE '" & showStart & "%' "
end if
'showPhrase
if len(showPhrase) > 0 then
mySQL = mySQL & "AND " & showField & " LIKE '" & "%" & showPhrase & "%' "
end if
'Status
if len(showActive) > 0 then
mySQL = mySQL & "AND SupplierActive = """ & showActive & """ "
end if
'Sort Order (secondary sort key is always Supplier)
if sortField = "SupplierName" then
mySQL = mySQL & "ORDER BY " & sortField & " "
else
mySQL = mySQL & "ORDER BY " & sortField
end if
set rs = openRSopen(mySQL,0,adOpenStatic,adLockReadOnly,adCmdText,pageSize)
if rs.eof then
%>
No Configuration Variables matched search criteria.
<%
else
rs.MoveFirst
rs.PageSize = pageSize
totalPages = rs.PageCount
rs.AbsolutePage = curPage
%>
<%
call pageNavigation("selectPageTop")
%>
Sort by :
>configVar
>adminType
>configVal
>configValLong
<%
rowColor = col1
%>
<%
end if
call closeRS(rs)
%>
Help and Instructions :
Overview - Allows you to edit, add or delete
system wide configuration variables. Configuration variables are created
dynamically within the system to allow for programmatic creation..
Type - C = configuration
variable. T = Text variable
Name - Name of the
variable as used in script.
<%
call closedb()
%>
<%
'*********************************************************************
'Make QueryString for Paging
'*************************************************