hvorfor er der EOF

<% Do %>
  <tr>
    <td>
      <center>
        <% Response.Write rs("Threadskriver") %>
      </center>
    </td>
    <td>
      <center>
        <% Response.Write rs("Thread") %>
      </center>
    </td>
    <td class="dato"><% Response.Write rs("Threaddato") %></td>
    <td>
      <center>
        <% Response.Write strSum("comments") %>
      </center>
    </td>
  </tr>
  <% rs.movenext
    strSum.movenext
  Loop while Not rs.EOF or strSum.EOF %>
</table>

når jeg har sat loopet til at stoppe når rs or strSum EOF
hvorfor får jeg så fejlen :
ADODB.Field (0x80020009)
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.