肿瘤医院环境影响:ASP代码？

dim delid //定义变量delid
delid=request("id") //接受提交数据ID附给变量delid
page=request("page") //接受提交数据page附给变量page
set rs1=server.createobject("adodb.recordset")
//定义一个recordset数据集合rs1
sql="select * from reply where id=" & delid //通过ID查找表reply中的记录
rs1.open sql1,conn,1,3 //执行查询
if rs.eof and rs.bof then //如果查询为空
%>
<script language="javascript"> //JS角本
alert("评论不存在"); //弹出"评论不存在"对话框
< document.location="listreply.asp?page=<%=page%>"; //跳到指定页面
</script>
<%
else
rs.delete //否则删除当前评论.

这个和前面的问题其本差不多,就是来玩我们这些人的是不?你的名字已记录我的黑名单了.

dim delid ' 定义变量
delid=request("id") ' 把 deild 的值设成地址传递参数 id 的值
page=request("page") ' 与上条语句作用类似
set rs=server.createobject("adodb.recordset") '定义 rs，并把它定义成 ADODB (ActiveX Data Object Database) 的记录集对象
sql="select * from reply where id=" & delid '定义变量 sql，并把它的值设成一个 sql 查询语句
rs.open sql,conn,1,3 '让 rs 记录集用 sql 语句查询 conn 连接到的数据库里的记录，并返回到 rs 中
if rs.eof and rs.bof then '如果没有符合查询条件的记录
%>
<script language="javascript">
alert("评论不存在");
< document.location="listreply.asp?page=<%=page%>";
</script>
<%
else
rs.delete ' 把第一条记录删掉(这时 rs 记录指针指向第一条记录)