Mensaje no hay registros

[javmireles]

SQLstring = "SELECT ... etc., tu consulta"

Set Tabla = Base.Execute (SQLstring)

'Preguntas si estas en el Fin de Archivo (EOF), si EOF vale True entonces significa que no hubo coincidencias.

if (Tabla.EOF) then
' No hubo coincidencias por lo que muestras tu mensaje
Response.Write "No se han encontrado coincidencias"
else
'Si hubo coincidencias
...
end if

Tabla.Close
Base.Close

Set Tabla = nothing
Set Base = nothing