BOF og EOF?

Hvis DB'en er tom - melder den naturligtvis fejl - hvordan kan jeg undgå denne noget frustrende fejl :P

Gør ud fra at det er noget EOF/BOF dims - men mere fatter jeg heller ikke

----------------KODEN-------------------------

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

  strSQL = "SELECT * from div_item ORDER BY slags ASC"
  set rs = conn.execute(strSQL)
do
    strtekst = rs("tekst")
    strslags = rs("slags")
    strid = rs("idoption")

    response.Write("<tr><td>" & strtekst & "</td><td>" & strslags & "</td><td>")
    response.write("<a href='skrivmisc.asp?mode=ret&id=" & strid & "'>RET</a></td>")
    response.write("<td><a href='skrivmisc.asp?mode=slet&id=" & strid & "'>SLET</a></td></tr>")
    rs.MoveNext
    Loop while not rs.EOF
   
Conn.Close
Set Conn = Nothing