拉斯维加斯是免税州吗:做一个可以把目前数据库中的资料列表的页面怎么做?谢谢了呵呵

来源:百度文库 编辑:高校问答 时间:2024/05/02 19:11:07
我是新手,现在要做把目前数据库中的资料列表的页面不知道该怎么做?

<%
Set cn=Server.CreateObject("ADODB.Connection")
cn.Open "Driver={Microsoft Access Driver (*.mdb)};dbq="& Server.MapPath("abc.mdb") //连接数据库
Set rs=Server.CreateObject("ADODB.RecordSet") //创建数据库记录集对象
sql="Select * from table where id="&
rs.Open sql,cn,2,2 //打开数据库
%>
<table border="1" >
<tr>

<td >发件人</td>
<td >创建时间</td>
<td >主题</td>

</tr>
<%
if not(rs.bof and rs.eof) then
rs.MoveFirst
do while not rs.eof //循环遍历数据库记录
%>
<tr>

<td ><%=rs("name")%></td>
<td ><%=rs("SendTime")%></td>
<td ><%=left(rs("title"),13)%>...</td>

</tr>

<%
rs.MoveNext
loop
end if
%>
</table>