Qn on SQL Query

<%@ Language=VBScript %>
<%Response.Buffer=True%>
<!--#include file="setting.asp" -->

<%
 Dim Conn
 OpenConnection Conn 
 Dim sqlQuery
 
 Dim rsQuery
 Dim i
 Set rsQuery = Server.CreateObject("ADODB.Recordset")
 
 i = Request.QueryString("id")
 sqlQuery=""
 sqlQuery="SELECT cust_id from ol_answer Where survey_taken='Y'"
 rsQuery.Open sqlQuery,Conn
 
 IF rsQuery("cust_id") = Request.QueryString("id")Then
 Response.Redirect "process_result.asp"
 else
 Response.Redirect "survey.asp"
 End If
 
 CloseConnection Conn
%>