Ang. søgning i database

Når jeg bruger nedenstående får jeg kun det jeg søger på og det er også meningen, men hvis jeg indtaster noget som jeg ved ikke er i database, vil jeg gerne ha den til at komme ud med en Fejl: \" det søgte kan ikke findes \", hvordan gør jeg det???

------------------------------------------------------
<%
If Request.Form(\"soeg\") <> \"\" then
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DBQ=c:\\produktion\\fejlsystem\\fejlsystem.mdb;DefaultDir=c:\\produktion\\fejlsystem;Driver={Microsoft Access Driver (*.mdb)}\"
SQL = \"select * from sager where RMA like \" & Request.Form(\"soeg\")
Set RS= Server.CreateObject(\"ADODB.RecordSet\")
rs.open SQL,conn
do while not rs.eof and not rs.bof
rs.movenext
loop
%>