fejl når der ikke er noget at udskrive

hvad er det jeg skal sætte ind så den ikke skriver denne fejl

ADODB.Field error '800a0bcd'

Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.

/tilmelding/default.asp, line 80


det er fordi der ikke er noget at udskrive:


<%
strSQL = "Select * From hold "
Set rs = Conn.Execute(strSQL)
Do
strNavn = rs("holdnavn")
strLink = "<a href='holdnavnliste.asp?id=" & rs("Id") & "'>"& strNavn & "</a>"
Response.Write "" & strLink & "<BR>"
rs.MoveNext

Loop While Not rs.EOF

%>