| <%
thisSiteUrl="http://"& Request.ServerVariables("server_name")
thisUrl=thisSiteUrl & Request.ServerVariables("Script_name")
'response.write "thisSiteUrl="& thisUrl
thisUrl = Trim(thisUrl)
thisUrl = LCase(thisUrl)
'response.write "thisSiteUrl="& thisUrl
'thisUrl = Replace(thisUrl,Chr(10),"")
'thisUrl = Replace(thisUrl,Chr(13),"")
If thisUrl<>"http://www.ourski.com/Default.asp" And thisUrl<>"http://www.ourski.com/default.asp" And thisUrl<>"http://www.ourski.com/" And thisUrl<>"http://www.ourski.com" Then
%>
<%
End If
%>
<%
SearchRs.close
set SearchRs=nothing
%> |