<%@ page import="diamondedge.asp.*,diamondedge.util.*,diamondedge.ado.*" %>
<%!
%>

<%
   int i = 0;
   Recordset rs = null;
   Connection Conn = null;
   Asp.init( request, response, out );
%>

<HTML>
<HEAD>
<TITLE>ActiveX Data Object (ADO)</TITLE>
</HEAD>
<BODY BGCOLOR=#FFFFFF>
<H3>ActiveX Data Object (ADO)</H3>
<%
   Conn = new Connection();
   //Conn.Open Session("ADO_CONNECT_STRING")
   AdoUtil.registerDriver("sun.jdbc.odbc.JdbcOdbcDriver");
   Conn.open("jdbc:odbc:dmv_www", null, null);
   rs = Conn.execute( "SELECT * FROM Driver" );

%>

<P>
<TABLE BORDER=1>
<TR>
<%
   for( i = 0; i <= (rs.getFields().getCount() - 1); i++ )
   {
%>

       <TD><B><FONT SIZE=2><%= rs.getField(i).getName() %></B></TD>
<%
   }
%>

</TR>
<%
   while( ! (rs.isEOF()) )
   {
%>

       <TR>
<%
     for( i = 0; i <= (rs.getFields().getCount() - 1); i++ )
     {
%>

            <TD VALIGN=TOP><FONT SIZE=2><%= rs.getField(i).getValue() %></TD>
<%
     }
%>

       </TR>
<%
     rs.moveNext();
   }
   rs.close();
   Conn.close();

%>

</TABLE>
</BODY>
</HTML>