<html>
<title>CodeAve.com(Display Table with Select Fields(Hard-Coded))</title>
<body bgcolor="#FFFFFF">
<%
'正读取的Accessdb的名称
accessdb="fidrych"
'关连到DSN-less连接的数据库
cn="DRIVER={Microsoft Access Driver (*.mdb)};"
cn=cn & "DBQ=" & server.mappath(accessdb)
'创建一个记录设置对象服务器
Set rs = Server.CreateObject("ADODB.Recordset")
'选择the_bird 表格的特定区域
sql = "select year, team, w, l, cg, so, era from the_bird"
'执行sql
rs.Open sql, cn
%>
<table BORDER="1" align="center" width="500">
<tr>
<td>Year</td>
<td>Team</td>
<td>W</td>
<td>L</td>
<td>CG</td>
<td>SO</td>
<td>ERA</td>
</tr>
<%
'移动第一个记录
rs.movefirst
'开始会以最后的记录结束的循环
do while not rs.eof
%>
<tr>
<td>
<%= rs("year") %>
</td>
<td>
<%= rs("team") %>
</td>
<td>
<%= rs("w") %>
</td>
<td>
<%= rs("l") %>
</td>
<td>
<%= rs("cg") %>
</td>
<td>
<%= rs("so") %>
</td>
<td>
<%= rs("era") %>
</td>
</tr>
<%
'移动下个记录
rs.movenext
'循环回到do语句
loop %>
</table>
</body>
</html>
<%
'关闭和设置记录设置为无
rs.close
set rs=nothing
%>
热门信息
阅读 (109)
1 什么样的编程语言是最值得我们学习的呢？阅读 (109)
2 asp 如何解析api接口返回的xml阅读 (109)
3 ASP-数组阅读 (108)
4 asp网站伪静态化URL Rewrite中的httpd.ini伪静态化规则编写方法阅读 (105)
5 asp取access数据库里本周、本月、本季度的记录~