<%
str = ""
if Request.Form("Search") = "" then
str = "SELECT * FROM Organizations Order by " & Request.QueryString("How")
else
str = "SELECT * FROM Organizations where Organization like '%" & Request.form("Search") & "%' OR Contact like '%" & Request.form("Search") & "%' Order by Organization"
end if
set rsTemp = conn.Execute(str)
do until rsTemp.Eof
tempTyp = rsTemp("Type")
tempOrg = rsTemp("Organization")
tempCou = rsTemp("Country")
tempCon = rsTemp("Contact")
str2 = str2 & ""
if Request.QueryString("How") = "Country" then
if not tempCou = OldCou then
str1 = str1 & (comma & " " & tempCou & "")
str2 = str2 & "