<%
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
Conn.open="C:\Data\Websites\3knetwork.net\content\dvd_db\dvd.mdb"
set rs = Server.CreateObject("ADODB.recordset")
sql="SELECT TITLE, FORMAT, REGION FROM Q_Brents_Titles"
rs.Open sql, conn
%>
<%for each x in rs.Fields
response.write("| " & x.name & " | ")
next%>
<%do until rs.EOF%>
<%for each x in rs.Fields%>
| <%Response.Write(x.value)%> |
<%next
rs.MoveNext%>
<%loop
rs.close
conn.close
%>
|
|
