<% response.expires=-1 set conn=Server.CreateObject("ADODB.Connection") conn.Provider="Microsoft.Jet.OLEDB.4.0" conn.Open(Server.Mappath("/data/Archived Movies.mdb")) set rs=Server.CreateObject("ADODB.recordset") sql="SELECT DISTINCT Genre FROM Movies UNION SELECT DISTINCT Genre2 FROM Movies UNION SELECT DISTINCT Genre3 FROM Movies ORDER BY Genre" rs.Open sql, conn 'searchType=request.form("searchType") 'genre=request.form("Genre") 'mName=request.form("movieName") 'filterResults=request.Form("filterResults") 'intCount=0 'Pretty simple stuff, all the stuff from the main page gets outputted here instead. I think the problem might come from the 'fact that things get tricky when you need to use quotation marks inside the response.Write statement. response.Write("
") if request.QueryString("q")="basic" then response.Write(" Movie name: "" then response.Write("value="+mName) response.Write("ID='Text1'/>") response.Write("
") response.Write(" ") response.Write("Genre: ") elseif request.QueryString("q")="advanced" then response.Write("") response.Write("
") response.Write("
") response.Write("Genre:
genrespot2
genrespot3
") set rs=Nothing end if response.Write("
") %>