就是,ID大的,先显示,ID为1,最后显示.
这是我编的.
<%
set conn=server.createobject("adodb.connection")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("data.mdb")
%>
<%
Set rs=server.createobject("adodb.recordset")
sql="select * from user"
rs.Open sql,conn,1,1
%>
<table border="1" width="600" id="table1">
<tr>
<td>ID</td>
<td>name</td>
<td>password</td>
<td>mail</td>
<td>web</td>
<td>QQ</td>
<td>time</td>
<td>IP</td>
</tr>
<%
do while not rs.eof
%>
<tr>
<td><%=rs("ID")%></td>
<td><%=rs("name")%></td>
<td><%=rs("password")%></td>
<td><%=rs("mail")%></td>
<td><%=rs("web")%></td>
<td><%=rs("qq")%></td>
<td><%=rs("time")%></td>
<td><%=rs("ip")%></td>
</tr>
<%
rs.movenext
loop
%>
</table>
<%
conn.close
set conn=nothing
%>
參考答案:服务到家,我是用你的代码改的.你copy过去用就行了.记得加分给我.
==============================
<%
set conn=server.createobject("adodb.connection")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("data.mdb")
%>
<%
Set rs=server.createobject("adodb.recordset")
sql="select * from user order by id desc"
rs.Open sql,conn,1,1
if rs.eof or rs.bof then
response.write ("暂无信息")
else
%>
<table border="1" width="600" id="table1">
<tr>
<td>ID</td>
<td>name</td>
<td>password</td>
<td>mail</td>
<td>web</td>
<td>QQ</td>
<td>time</td>
<td>IP</td>
</tr>
<%
do while not rs.eof
%>
<tr>
<td><%=rs("ID")%></td>
<td><%=rs("name")%></td>
<td><%=rs("password")%></td>
<td><%=rs("mail")%></td>
<td><%=rs("web")%></td>
<td><%=rs("qq")%></td>
<td><%=rs("time")%></td>
<td><%=rs("ip")%></td>
</tr>
<%
rs.movenext
loop
%>
</table>
<%
conn.close
set conn=nothing
end if
%>