% Response.Buffer = True '========================================= 'This code is copyright (c) Internet Business Solutions SL, all rights reserved. 'The contents of this file are protect under law as the intellectual property 'of Internet Business Solutions SL. Any use, reproduction, disclosure or copying 'of any kind without the express and written permission of Internet Business 'Solutions SL is forbidden. 'Author: Vince Reid, vince@virtualred.net %> <% if storesessionvalue="" then storesessionvalue="virtualstore" if (Session("loggedon") <> storesessionvalue AND request.cookies("WRITECKL")="") OR disallowlogin=TRUE then response.redirect "login.asp" isprinter=(request.querystring("printer")="true") if request.form("powersearch")="1" then if request.form("startwith")="1" then response.cookies("powersearch")="1" response.cookies("powersearch").Expires = Date()+365 else response.cookies("powersearch")="0" response.cookies("powersearch").Expires = Date()+365 end if end if %>
