<%'*** Begin Right Portal Bar If (advArray(26) OR scr_Name = "default.asp") AND Instr(scr_Name, "admin") = 0 AND _ NOT scr_Name = "update.asp" AND _ NOT scr_Name = "post_new2.asp" AND _ NOT scr_Name = "process.asp" Then %> <% If advArray(28) then %>

	<%= head_right1 %>
	<% Response.Write BuildContent(display_right1, top_right1, 4) %>

	<%= head_right2 %>
	<% Response.Write BuildContent(display_right2, top_right2, 5) %>

	<%= head_right3 %>
	<% Response.Write BuildContent(display_right3, top_right3, 6) %>

<% End If %>
<% End If If not sTarget = Empty then Application("Cat_List" & strUnique) = Empty buildOptionList Function buildOptionList() Select Case Application("Cat_List" & strUnique) Case Empty set rscat = objConn.Execute("SELECT " & tablPfx & "Cat.catName, " & tablPfx & "Cat.catID FROM " & tablPfx & "Cat;") optCatList = "" If not rscat.EOF then Do While Not rscat.EOF catName = rscat(0) catID = rscat(1) If CStr(sTarget) = CStr(catID) then build = true optCatList = optCatList & "" Else: optCatList = optCatList & "" End If rscat.MoveNext Loop End If If not build then Application("Cat_List" & strUnique) = optCatList rscat.close set rscat = Nothing Case Else optCatList = Application("Cat_List" & strUnique) End Select End Function %>

<%= strText_SearchFor%>:		<%= strText_City %>:				<%= strText_Youarevisitor %>: <% Response.Write Request.Cookies("clboard_hitcount" & strUnique)("visitor") %>
<%= strText_SearchIn%>:		<%= strText_WithPhotoOnly %>:>			<%= strText_AdvancedSearch %>	[<%= strText_Refresh %>]

<% If CBool(advArray(21)) then %>

<% If Len(advArray(10)) > 0 then %> <% End If If Len(advArray(12)) > 0 then %> <% End If If Len(advArray(14)) > 0 then %> <% End If If Len(advArray(16)) > 0 then %> <% End If If Len(advArray(18)) > 0 then %> <% End If %>

<% Else: Response.Write "" End If %>

<% Response.write " " Set objFile = Nothing On Error Resume Next Set rs = Nothing If session("cached" & strSUnique) = "yes" then Call cacheAds(adID): session("cached" & strSUnique) = Empty: Else objConn.close Set objConn = Nothing %>