[求助]请问点击纽为什么没有反应？
这个我做的留言本，为什么点击删除没有反应呢？请高手指点，谢谢！
http://lyb123.goofar.com
这是代码：
<!--#include file=\"conn.asp\"-->
<html>
<head><title>分页</title><head>
<body >
<%
exec=\"select * from wd1 order by id desc\"
set rs =server.createObject(\"adodb.recordset\")
rs.open exec,cn,1,1
%>
<%
rs.pagesize=7 '指示recordset一页所包含的记录数
zongyesou=rs.pagecount '使用pagecount属性可确定recordset对象中数据的页数
page=int(request(\"page\"))
if page<=0 then page=1
if request(\"page\")=\"\" then page=1
rs.absolutepage=page '指定当前记录所在的页
%>
<%
if rs.eof and rs.bof then
response.write(\"暂时还没有文章\")
else
for i=1 to rs.pagesize
response.write \"编号:\" & rs(\"ID\")
response.write (\"姓名:\"& rs(\"xm\"))
response.write (\"日期:\"& rs(\"rq\"))
response.write (\"<br>留言:\"& rs(\"ly\"))%>
<form method=\"get\" action=\"de.asp?id=rs(\"id\")\">
<input type=\"button\" value=\"删除\" name=\"B1\"
style=\"color: rgb(0,128,0)\">
</form>
<%response.write (\"<hr>\")
rs.movenext
if rs.eof then exit for
next
end if
%>
<!--include file=\"conn.asp\"-->
<html>
<head><title>删除页面</title></head>
<body>
idx=request(\"id\")Set rs=Server.CreateObject(\"Adodb.RecordSet\")
rs.Open \"Delete * from wd1 where ID='\"&IDx&\"'\",conn,1,3
rs.close
set rs=nothingresponse.redirect\"fy1.asp\"
</body>
</html>
请高手指点，谢谢！
