<!--#include virtual="/common_routines/library.asp"-->
<!--#include virtual="/publish/include/fp_library.asp"-->
<!--#include virtual="/publish/include/avsearchlib.asp"-->

<%

dim db
dim product, database, layout
Dim sServerName, sScriptName, sQueryString, sRedirect

product = application("eLogicProduct")
database = application("eLogicDatabase")

sServerName = Request.ServerVariables("SERVER_NAME")

'2004-04-16 Albert Chi
'For reed-electronics.com domain strength, redirectly permanently
'if the browser used another domain like e-insite.net
If InStr(1, sServerName, "reed-electronics.com") = 0 and InStr(1, sServerName, "edn.com") = 0 Then
	sScriptName = Request.ServerVariables("SCRIPT_NAME")
	sQueryString = Request.QueryString

	sRedirect = "http://www.reed-electronics.com" & sScriptName
	If Len(sQueryString & "") > 0 Then sRedirect = sRedirect & "?" & sQueryString
	
	Response.Status = "301 Moved Permanently"
	Response.AddHeader "Location", sRedirect
	Response.End
End If

call eLogicSetCookies()

set db = get_sql_connection()

layout = "EDNArchiveTop"

call debug_trace("product:"&product&" layout="&layout&" database="&database)
Response.Write(fp_display_layout_db(db, product, layout, database))

%>