<% sql = "SELECT * FROM categorias ORDER by nome" Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sql, MeuDB, 3, 3 %>
Nome da Categoria:
Edita/Apaga Categoria
:
<% Do While not rs.eof %>
"><%= rs("nome") %>
<% rs.movenext Loop %>