<% 'dim conexaodb StrSQL = "SELECT admin_id, admin_nome, Admin_login FROM Administrador Order BY admin_nome DESC" Call AbreConexao Set Rs = Conexaodb.Execute(StrSQL) %> <% IF Not Rs.EOF Then While Not Rs.EOF %> <% RS.Movenext Wend Rs.close Call FechaConexao Set Rs = Nothing ELSE %> <% END IF %>

Adicionar › Administrador
Nome	Login
<%=Rs("admin_nome")%>	<%=Rs("Admin_login")%>	'"> '">
Não Contém Nenhum Cadastro Efetuado!!!