2.2.4 maninfo.asp(管理信息)
<!--#include file=”title.asp”-->
<%set rs=server.createobject("adodb.recordset")
rs.open “select * from 信息表”,c1,1,1%>
<table>
<tr bgcolor=”#cccccc”>
<td height=20>索取号</td>
<td>标题</td>
<td>发布时间</td>
<td>管理</td>
</tr>
<% for i=1 to rs.recordcount
‘设置循环,循环出数据库中所有记录%>
<tr>
<td height=20><%=trim(rs(“索取号”))%></td>
<td><%=trim(rs(“标题”))%></td>
<td><%=trim(rs(“发布时间”))%></td>
<td>[<a href=”modiinfo.asp?id=<%=rs(“索取号”)%>”>修改</a>][<a href=”delinfo.asp?id=<%=rs(“索取号”)%>”>删除</a>]</td>
</tr>
<%’以上为显示数据的程序
rs.movenext
next
rs.close%>
</table>
2.2.5 delinfo.asp(删除信息)
<!-- #include file="title.asp"-->
<%set rs=server.createobject("adodb.recordset") rs.open “delete from 信息表 where 索取号=’"&trim(request("id"))&”’”
|