第一步:连接Access数据库
<%
dim conn,rs
set conn = server.createObject("adodb.connection")'声明一个数据库实例
'连接数据库
conn.connectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("text.mdb")
conn.open
'或者使用conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("text.mdb")的方式连接
set rs = server.createObject("adodb.recordset")'创建一个记录表的实例
rs.open "择友俱乐部",conn,1,3'
response.write "表连接成功" &"<hr/>"
%>
第二步:在<body></body>中写入table
<table border="1" width="700" align="center">
<tr>
<%