Mostrar todos registros

Um dos meus problemas no começo era exibir um recordset, com todos os registros em determinado campo. Porem isso é uma tarefa facil,que vou explicar detalhando:

<%
'cria o objeto pra conexao
Set conexao=server.createobject("adodb.connection")
'cria o recordset
set rs=server.createobject("adodb.recordset")
'informa a conexao p/ o recordset
rs.activeconnection = "PROVIDER=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("teste.mdb")
'abre e pegara todos campos da tabela de nome table
rs.open "SELECT * FROM table"
%>
<%
'aqui informa q enqto nao for o fim..
While (NOT RS.EOF)
'execute esta instrução
response.write RS("nome") & "<BR>"
'e mova para o proximo!
rs.movenext()
WEND
'pra terminar feche o objeto e libere recursos :)
rs.close
%>

pronto! simples nao? :)
na parte response.write RS("nome") pode-se editar como quiser, q ele vai repetir ate q nao tenha mais registros.

valeu galera :)

Esta matéria foi postada originalmente no ASP4Developers por Oscar Pires (BLADE) (site), que na época era "Desenvolvedor ASP e Visual Basic, desenvolve sites interativos e sistemas para empresas. ". Hoje, vai saber...