Løkke problem

Hej.

Jeg har bikset noget kode sammen der skal hente alle poster i DB'ens Name der starter med bogstavet fra Request.Querystring("search")...F.eks bogstavet a.
Problemet er hvordan formulere jeg løkken så den stopper når der f.eks ikke er flere ord i Name der starter med A.

Her er koden:

<%

Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("gamedb.mdb")
Conn.Open DSN

strSQL = "SELECT * FROM Games WHERE (Name LIKE '%" & Request.Querystring("search") & "%')"
Set rs = Conn.Execute(strSQL)

Do
Response.Write "Navn:" & rs("Name") & " " & rs("Filename") & "<BR>"
rs.MoveNext

Loop While ???

Conn.Close
Set Conn = Nothing
%>


Mange tak!