Vis hvad du har søgt på?

Hejsa!
Hvordan laver man en funktion som når man har søgt på sin søgemaskine og den ikke finder noget skriver den ! Vi fandt ikke nogle ting ang. (søgeordet)!

Her er koden:

<%
If Request.Form("soeg") <> "" then
    Set DB = Server.CreateObject("ADODB.Connection")
    DBSti = "DBQ=" & Server.Mappath("soeg.mdb")
    DB.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & DBSti
    SQL = "select * from Soeg where url like '%" & Request.Form("soeg") & "%' or Navn like '%" & Request.Form("soeg") & "%'"
    Set rs = db.Execute (SQL)
    If not rs.eof then
        Response.Write "<table>"
        Response.Write "<tr><td><font face=verdana size=1><b>Navn</b></font></td><td width=30></td><td><font face=verdana size=1><b>URL</b></font></td></tr>"
        Do until rs.eof
            url = rs("url")
            Response.Write "<tr><td><font face=verdana size=2>" & rs("navn") & "</font></td><td width=30></td><td><font face=verdana size=1><a href='http://" & url & "'>" & url & "</a></font></td></tr>"
            rs.movenext
        Loop
        Response.Write "</table>"
    Else
        Response.Write "<b>Vi fandt desværre ingenting i databasen!</b>"
    End if
End if


%>

På forhånd tak!