Mac airdrop在哪里设置:朋友们，帮忙看一下，那里写错了，怎么删除不了东西

来源：百度文库 编辑：中科新闻网 时间：2024/05/06 00:12:15
<!--#include file="xjk.asp"-->
<%
dim sql
set rsc = server.createobject("adodb.recordset")
sql = "select*from guest order by id desc"
on error resume next
rsc.Open sql,conn,1.1
RSC.MoveFirst
do while not rsc.eof
%>

<body>
<form name="form1" method="post" action="">
<div align="center">
<input type="hidden" name="hiddenField">
<table width="700" height="63" border="0" cellpadding="3" cellspacing="1" bgcolor="#000000">
<tr>
<td width="60" bgcolor="#FFFFFF"><div align="center">姓名</div></td>
<td bgcolor="#FFFFFF"><div align="center">留言内容</div></td>
<td width="180" bgcolor="#FFFFFF"><div align="center">日期</div></td>
<td width="70" bgcolor="#FFFFFF"><div align="center">回复</div></td>
<td width="40" height="30" bgcolor="#FFFFFF"><div align="center">删除</div></td>
</tr>
<tr>
<td bgcolor="#FFFFFF"><div align="center"><%=rsc("xm")%></div></td>
<td bgcolor="#FFFFFF"><div align="center"><%=rsc("lymy")%></div></td>
<td bgcolor="#FFFFFF"><div align="center"><%=rsc("sjb")%></div></td>
<td bgcolor="#FFFFFF"><div align="center">

<input type="submit" name="Submit" value="回复">
</div></td>
<td Loop width="40" height="30" bgcolor="#FFFFFF"> <div align="center" >
<%dim currentpa%>
<a href="xc.asp?id=<%=rsc("id")%>">删除</a></div></td>
</tr>
</table>
<%
rsc.movenext
loop
rsc.Close
%>

这是删除连接的
<!--#include file="xjk.asp"-->

<head>
<title>您已经删除成功！谢谢使用！</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta http-equiv=refresh content=3;url=admin.asp>
</head>

<body bgcolor="#FFFFFF" text="#000000">
<%
dim rs
dim sql
set rsc = server.createobject("adodb.recordset")
sql = "select*from guest where id="&request.querystring("id")
rsc.Open sql,conn,1,1
rsc.close
%>
<table width="474" border="0" align="center">
<tr>
<td><font size="2" color="#FF0000">谢谢您的使用！您已经删除成功！本页将自动转向，请等待…………</font></td>
</tr>
</table>
</body>
</html>

我也不懂！~
dim sql ‘定义变量 SQL
set rsc = server.createobject("adodb.recordset")
sql = "select*from guest order by id desc"
on error resume next
rsc.Open sql,conn,1.1
RSC.MoveFirst
do while not rsc.eof
%>
看的麻烦吗？ 到网上重新找一个 好了 ！~论坛代码很多的

朋友们，帮忙看一下，那里写错了，怎么删除不了东西 那位高手帮我看一下，怎么我删除不了东西，那里代码写错了？ 删除文件问题!朋友们帮忙看下! 如何删除头50000条数据？我写了一个不对，大家帮忙看一下哪有错误,谢谢！ 我的电脑网页搜索器不知跑那里去了,请朋友们帮忙解决一下. 帮忙看一下访问数据库的怎么写？ 朋友们!能跟我说一下论文怎么写好吗?谢谢了, 关于刻录DVD的问题~朋友们帮忙看一下 请玩过《午夜俱乐部》的朋友们帮忙看一下 帮忙看一下CSS哪错了