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
%>