asp,mdb,工具

<%
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open "/test.mdb"

set rs = Server.CreateObject("ADODB.recordset")
rs.Open "SELECT * FROM class", conn

do until rs.EOF
  for each x in rs.Fields
    Response.Write(x.name)
    Response.Write(" = ")
    Response.Write(x.value & "<br />")
  next
  Response.Write("<br />")
  rs.MoveNext
loop

rs.close
conn.close
%>

 

 

注意conn.Open "/test.mdb" 　　//test.mdb所在地

.mdb的工具，如果不想安装office 可以下载MDBPlus(password:5b5q)