ASP问题 急 急 急 急 急 急 急 急 急

<%

db="provider=microsoft.jet.oledb.4.0;data source="&server.mappath("数据库.mdb")"
conn=server.createobject("adodb.connection")
conn.open db
'---------------以上为连接数据库-------------
sql="select 姓名,年龄,性别 from tablename" '将SQL语句以字符串的形式存入变量sql
set rs=conn.execute(sql)'执行变量SQL打开表.
if rs.eof or rs.eof then '如果数据库没有记录,在网页中显示无记录.
response.write "无记录"
else'否则执行以下程序%>
<table>
<tr>
<td>序号</td>
<td>姓名</td>
<td>身高</td>
<td>性别</td>
</tr>
<%
i=0
do while not rs.eof 'do while...loop为循环体,条件:直到表指针指向最后一条记录.
i=i+1 '每循环一次,i加一次1.这样达成一个序号的目的,1,2,3,4,5,6等等
name=rs("姓名") '读取表中字段的值.
age=rs("年龄")
sex=rs("性别")
%><tr>
<td><%=i%></td> <%'将值显示