Dados de uma tabela não aparecem

Olá,

Estou montando uma tabela (html) que informa os registros em ASP. Eu utilizei o código abaixo, mas ele simplesmente não exibe nenhum dado. Verifiquei a instrução SQL e se existe registro nessa tabela, porém foi constatado que está tudo certo. Qual seria o problema?

<%

 selecionarpedidoaberto = "Select * from pedidos where cod_pessoa=" & session("usr_log_ok")
 set rsselecionarpedidoaberto = Conn.Execute(selecionarpedidoaberto)

%>
<% Do until rsselecionarpedidoaberto.eof %>

 <tr>
 <td width="15%" bgcolor="#FFF9EA"><div align="center" class="fonteescolha"><%=rsselecionarpedidoaberto("id")%></div></td>
 <td width="52%" bgcolor="#FFF9EA"><div align="center" class="fonteescolha"><%=rsselecionarpedidoaberto("nome")%></div></td>
 <td width="4%" bgcolor="#FFF9EA"><div align="center" class="fonteescolha"><%=rsselecionarpedidoaberto("quantidade")%></div></td>
 <td width="23%" bgcolor="#FFF9EA"><div align="center" class="fonteescolha"><%=rsselecionarpedidoaberto("preco1")%></div></td>
 </tr>
 <% rsselecionarpedidoaberto.movenext

Loop%>