%
'****** SQL-INJECTIONS
if instr(lcase(Request.ServerVariables("QUERY_STRING")),"script") or instr(lcase(Request.ServerVariables("QUERY_STRING")),"'") or instr(lcase(Request.ServerVariables("QUERY_STRING")),"char(27)") or instr(lcase(Request.ServerVariables("QUERY_STRING")),"char(39)") or instr(lcase(Request.ServerVariables("QUERY_STRING")),"%27") or instr(lcase(Request.ServerVariables("QUERY_STRING")),"declare") or instr(lcase(Request.ServerVariables("QUERY_STRING")),";") or instr(lcase(Request.ServerVariables("QUERY_STRING")),"--")then
response.Redirect "error.asp"
response.End
end if
'******* //SLUT FÅNGA SQL-INJECTION-ROBOTAR
'**********************************************************
' Kund: The Art of Shopping
' Skapad: 2005-03-09
' Ref: ludvig.lindblom@webexpress.se
' Funktion: Innehåller konstanter
'**********************************************************
If InStr(Request.ServerVariables("SERVER_NAME"), "ntserver") Then
LOCATION = 1
Else
LOCATION = 3
End If
Session.LCID = 1053
Response.Buffer = True
Response.ExpiresAbsolute = Now() - 1
Response.Expires = 0
Response.CacheControl = "no-cache"
Server.ScriptTimeout = 3600
If LOCATION = 1 Then
'DBPATH = ""
'FILENEWSPATH = ""
'FOLDERPATHNEWS = ""
'BASEPATH = ""
'SITETITLE = ""
ElseIf LOCATION = 2 Then
FILENEWSPATH = "/virtupload/news/"
FOLDERPATHNEWS = Server.MapPath("/virtupload/news/") & "\"
DBPATH = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=D:\user\wu020202\database\artofshopping.mdb"
BASEPATH = "/"
SITETITLE = "Publiceringsverktyg"
ElseIf LOCATION = 3 Then
FILENEWSPATH = "/virtupload/artofshopping/"
FOLDERPATHNEWS = Server.MapPath("/virtupload/artofshopping/") & "\"
DBPATH = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=D:\Kundweb\Rodamco\databas\artofshopping.mdb"
BASEPATH = "/"
SITETITLE = "the Art of Shopping"
End If
ADMINUSER = "kund"
ADMINPASS = "2003"
%>
...art of shopping...
Art of shopping - projektet som kopplar ihop kommersiell
shopping med design och människor - är nu avslutat men vi
återkommer snart med nya spännande projekt! Besök Art of shopping-sidan