<html><body>
<%
 set cn=server.createObject("ADODB.Connection")
 cn.open("DSN=esimene")
 set rs=cn.execute("SELECT * FROM nimed ;")
 if not rs.EOF then
  response.write("<table>")
  do until rs.EOF
   response.write ("<tr><td>" & rs("nimi"))
   rs.moveNext
  loop
  for each vali in rs.fields
    response.write "<td>" & vali.name
  next
  rs.moveFirst
    response.write(rs.getstring(,, "<td>", "<tr><td>", "&nbsp;"))
  response.write("</table></body></html>")
 end if
%>
