<<<<<



<% xDb_Conn_Str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("db/tb.mdb") & ";" set conn = Server.CreateObject("ADODB.Connection") conn.Open xDb_Conn_Str set rs=conn.execute("select * from agenti order by id desc") do while not rs.eof %> <% rs.movenext loop conn.close set conn = nothing %>
<%= rs("nome") %> <%= rs("zona") %>