% Dim rs, objconexao rs = "SELECT * FROM depoimentos ORDER BY cod DESC" Set RecSet = objconexao.Execute(rs) %>
DEIXE-NOS seu Depoimento:
<%do while NOT RecSet.EOF%>
| Nome:   <%= RecSet("nome")%>   <%= RecSet("depoimentos")%> |
<%RecSet.MoveNext%><%loop%>
<%
objconexao.Close
Set objconexao = Nothing
Set RecSet = Nothing
%>