Enquetes Anteriores

Selecione uma das Enquetes. <% dim enqueteID EnqueteID = request.querystring("ID") Set rs = Server.CreateObject("ADODB.Recordset") set rs.activeConnection = conn rs.CursorType = adOpenStatic sSQL = "SELECT * From perguntas WHERE perguntaID <> " & EnqueteID & " Order By perguntadatainicial desc" 'response.write sSQL rs.Open sSQL, , , adCmdTable do while not rs.eof Response.write ""& rs("perguntaquestao") &" " rs.movenext loop rs.close %>