Consulta a Sql con asp

[valderramalex]

Buenas tardes He Buscado una manera de realizar consulta a sql con asp y he encontrado este codigo pero me sale un error, el error no me dice la linea me podrian ayudar verificando en que estoy fallando muchas gracias.

<%
strUsuario = "10000000000002"


strSQL=""
strSQL = strSQL + "SELECT Cod_escarapela FROM tbrg_asistentes"
strSQL = strSQL + " WHERE USU_ID='" & strUsuario & "'"


Set miCon = Server.CreateObject("ADODB.Connection")
miCon.ConnectionString = "DRIVER=SQL Server;SERVER=(GL203\SQLEXPRESS);UID=sa;PWD=Guajir o;DATABASE=Usuarios"
miCon.Open

Set miRS = Server.CreateObject("ADODB.Recordset")
miRS.Open strSQL, miCon

if miRS.eof ="" then
dim Result = false
else
Result = True
end if

response.write (Result)

miRS.Close
miCon.Close

Set miRS = Nothing
Set miCon = Nothing
%>

[JuanRAPerez]

y el error es?

[valderramalex]

no realiza la consulta a la base de datos como tal para saber si existe el registro.
sale este letrero
An error occurred on the server when processing the URL. Please contact the system administrator.

[gdasoft]

Suponiendo que la cadena de conexión a tu db sea correcta por ejemplo veo que lo siguiente esta mal:

if miRS.eof ="" then
dim Result = false
else
Result = True
end if

Pues solo declaras el Result si es EOF pero en el Else no lo declaras. Iria mejor declarar las variable fuera.

Aunque es un fallo tribial pues si no lo declaras creo que funciona igual. El error mostrado es poco descriptivo.

[valderramalex]

te agradezco mucho voy a probarlo.

[Joch_pa]

Aparte existe un error mas grave el valor del atributo EOF es un boleano (Verdadero o Falso) y no un string:

Iniciado por valderramalex

if miRS.eof ="" then
dim Result = false
else
Result = True
end if

Esto deberia estar asi:

Código ASP:

if  miRS.eof then
        dim Result = false
    else
        Result = True
    end if
 

[gdasoft]

Joch_pa tiene toda la razón y yo no me di cuenta. Cuando se utiliza el EOF o BOF no se utiliza el igual (=)