永发信息网

asp无法批量删除

答案:1  悬赏:70  手机版
解决时间 2021-08-12 18:11

本人是个菜鸟,想要给留言本弄个批量删除,但是代码改好后删除后记录还在,请各位高手帮帮忙,本人感激不尽!

<!-- 全选 -->
<script language="javascript">
function CheckAll(thisform){
for (var i=0;i<thisform.elements.length;i++){
var e = thisform.elements[i];
if (e.Name != "chkAll"&&e.disabled!=true)
e.checked = thisform.chkAll.checked;
}
}
function unselectall(thisform){
if(thisform.chkAll.checked){
thisform.chkAll.checked = thisform.chkAll.checked&0;
}
}
</script>

<!-- 选择框 -->

<input type="checkbox" value="<%=rs("id")%>" name="id" onClick="unselectall(this.form)" />

<!-- 全选框与删除按钮 -->

<input name="chkAll" type="checkbox" id="chkAll" onClick=CheckAll(this.form) value="checkbox" />

<input name="delete" type="button" class="button" onclick="javascript:if(confirm('确定要删除吗?删除后不可恢复!')){window.location.href='guestbook.asp?action=del_all&amp;id=<%=rs("id")%>';}else{history.go(0);}" value="删除所选" />

<%

'批量删除代码
if request("action")="del_all" then
set rs=server.createobject("adodb.recordset")
id=Replace(Request.Form("id"),", ",",")
chkAll = Split(id,",")
For i = 0 To UBound(chkAll)
sql="select * from guestbook where id in("&chkAll(i)&")"
rs.open sql,conn,2,3
rs.delete
rs.update
Next
Response.Write "<script>alert('刪除成功!');window.location.href='guestbook.asp';</script>"
end if
%>

最佳答案

<form name="form" method="post" action="">
<!-- 选择框 -->


<input type="checkbox" value="<%=rs("id")%>" name="id" onClick="unselectall(this.form)" />


<!-- 全选框与删除按钮 -->


<input type="checkbox" name="checkbox" value="Check All" onClick="mm()">
<input type="submit" name="Submit class="go-wenbenkuang"" value="删 除" onClick="return test();">
</form>
<script>
function test()
{
if(!confirm('确认删除吗?')) return false;
}
</script>
<script language=javascript>
function mm()
{
var a = document.getElementsByTagName("input");
if(a[0].checked==true){
for (var i=0; i<a.length; i++)
if (a[i].type == "checkbox") a[i].checked = false;
}
else
{
for (var i=0; i<a.length; i++)
if (a[i].type == "checkbox") a[i].checked = true;
}
}
</script>


<%
selectnameid=request("selectnameid")
if selectnameid<>"" then
conn_hotel.execute "delete from guestbook where id in ("&selectnameid&")"


Response.Write "<script>alert('刪除成功!');window.location.href='guestbook.asp';</script>"
response.Redirect "manage_hotel.asp"
response.End
end if
%>



通过看你的代码,利用我之前一个批量删除代码给你改了下。试试能不能帮到你解决问题。如果不能,加我qq:437960263,帮你解决。

我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
求这种PS的样式
如何去除脚上的石灰甲
请问腰穿手术什么时候出结果?
禹州市许昌纤艺造型(商城路)地址在什么地方,
腾讯游戏 玫瑰花园里什么是断枝
湖南工程职业技术学院新生QQ群是多少
2010年热播的TVB时装处境喜剧《天天天晴》的
怎样完成二档绿水晶任务???
驻马店招聘会
和姐姐离别的祝福语
麻城市黄冈晏林记牛肉面(麻城店)地址是什么,
福建新闻广播主持人照片
桥式起重机 CAD图纸
面对美色诱惑扛得住的男人是怎样的额?哪方面
各种银行卡理财要点!!!
推荐资讯
在正方形ABCD中,G是CD上一点,延长BC到E,使
3GQQ上能不能创群呢?
椒江哪里有海尔电脑专卖店?
爱到底是怎样
每下载一个软件都需要在电脑端签名?
宜春圆通快递公司在什么地方,具体在哪个地址
呼市六中好还是十八中好?
为什么陈翔不参加勇往直前
请大家帮我取个好名字
我家狗狗掉毛拉怎么办
已知:10的M-1次幂 =20,10N+1次幂 =50,求:9
用化学方程式解释铜绿形成的原因
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?