verificar datos de la DB

[Shiryu_Libra]

aunque tengas declarada la variable.... en que parte le asignas al RS, lo que deseas hacer????

SQL="SELECT EMAIL FROM _clientes WHERE CUENTA='"&Request.Form("n_cuenta"&conta)&"'"
cn.execute(SQL)'execuamos la sentencia SQL

If RS.Bof Then
sSQL = "INSERT INTO _clientes (EMAIL, NUM_IDENTIFICACION, CLIENTE, DIRECCION, TELEFONO, PASSWORD, ESTADO)" & "VALUES ('"& Request.Form("mail") & "','" & Request.Form("idntfccion") & "','" & Request.Form("nombre") & "','" & Request.Form("dir") & "','" & Request.Form("tel") & "','" & Password & "', '0');"
cn.execute(sSQL)'execuamos la sentencia SQL
else
'msg = "Lo sentimos pero la cueta que usted ingreso ya esta siendo utilizada por otro usuario <br/>"
end if

si te fijas bien, ejecutas la consulta, pero como te dije anteriormente, no le asignas nada al RS, por eso da el error,, si quires manejarlo con el RS, entonces tendrias que cambiar la forma de la consulta, de la siguiente manera

SQL="SELECT EMAIL FROM _clientes WHERE CUENTA='"&Request.Form("n_cuenta"&conta)&"'"
rs.open SQL,cn,1,2 'execuamos la sentencia SQL

If RS.Bof Then
sSQL = "INSERT INTO _clientes (EMAIL, NUM_IDENTIFICACION, CLIENTE, DIRECCION, TELEFONO, PASSWORD, ESTADO)" & "VALUES ('"& Request.Form("mail") & "','" & Request.Form("idntfccion") & "','" & Request.Form("nombre") & "','" & Request.Form("dir") & "','" & Request.Form("tel") & "','" & Password & "', '0');"
set rdst=cn.execute(sSQL)'execuamos la sentencia SQL
else
'msg = "Lo sentimos pero la cueta que usted ingreso ya esta siendo utilizada por otro usuario <br/>"
end if
rs.close '<--- Cerramos el recordset que ya no usaremos