<% '****** 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 - 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   Besök även gärna något av våra köpcentrum!   Arninge Centrum Bålsta Centrum Eurostop Arlanda Eurostop Halmstad Eurostop Jönköping Eurostop Örebro Forum Nacka Haninge Centrum Novalund Solna Centrum Tyresö Centrum Täby Centrum Väsby Centrum