Erro no eof...

Criei uma consulta tabela para mostrar em html, só que estádandoerrono eof.

Minha conexao com o banco, e a condição while para relacionar todos os registros tah assim...

minha coneção....

<%set conexao= Server.CreateObject("ADODB.connection")
conexao.open ConString
set rsconexao= Server.CreateObject("ADODB.recordset")
rsconexao.open ("select * from tab_folha"),conexao%>
meu while....

<%while not rsconexao.eof%>
<%rsconexao.movenext
wend%>
meu fechamento....

<% set rsconexao=nothing
conexao.Close
set conexao=nothing%>

O resultado da pagina é esta... como se não encontrasse registro em tabela.

ADODB.Field (0x80020009)
BOF ou EOF são verdadeiros, ou o registro atual foi excluído. A operação solicitada pelo aplicativo requer um registro atual.