Listar Dados

[spash]

Ae pessoal,

Estava fazendo uma paginação simples para mostrar todos os dados de uma banco de dados meu, só que quando abro a página somente aparece 1 registro. Como faço para resolver isso?

<%
dim db,rs,sql,ass,name 
set db = Server.CreateObject("ADODB.Connection") 
db.Open "provider=microsoft.jet.oledb.4.0;data source="& server.mappath("banco_de_dados.mdb") 
sql = "select * from faq order by name desc" 
set rs = db.Execute(sql)
name = rs("name")

%><img src=../imagens/bolinha2.gif><a href="artigos/busca/questionview.asp?key=<%=rs.fields("name")%>" target="_blank"><%= rs("name") %></a><br>
<% rs.movenext
%>

alguém pode me ajudar a corrigir o código acima?

Obrigado!

[dark0]

faça um looping.. para passar por todo o banco...

[Tork]

<%
Dim db,rs,sql,ass,name

set db = Server.CreateObject("ADODB.Connection") 

db.Open "provider=microsoft.jet.oledb.4.0;data source="& server.mappath("banco_de_dados.mdb") 

sql = "select * from faq order by name desc" 

set rs = db.Execute(sql)

name = rs("name")

Do while not rs.EOF 'EOF significa End Of Fields então isso quer dizer: fazer enquanto não chegar ao fim dos campos
%>
<img src=../imagens/bolinha2.gif>
<a href="artigos/busca/questionview.asp?key=<%=rs.fields("name")%>" target="_blank"><%= rs("name") %></a><br>
<% 
rs.movenext
Loop
%>

[spash]

vaLEU A AJUDA GALERA...FUI!