- 資訊首頁(yè) > 開(kāi)發(fā)技術(shù) > web開(kāi)發(fā) > ASP >
- ASP下批量刪除數據的兩種方法
方法一：
代碼如下:
id=request.form("checkbox")
id=Split(id,",")
shu=0
for i=0 to UBound(id)
sql="select * from jiang_fname where id="&id(i)
set rs=conn.execute(sql)
if not rs.eof then
delete_file(rs("fname"))
end if
rs.close
set rs=nothing
sql="delete from jiang_fname where id="&id(i)
conn.execute sql,shu1
shu=shu+1
next
if shu>0 then
response.Write("<script>alert('刪除成功');location.href='"&url&"';</script>")
else
response.write("<Script>alert('刪除失敗');javascript: history.back();</script>")
end if
conn.close
set conn=nothing
方法二：巧用in關(guān)鍵字實(shí)現數據的批量刪除
managenews.asp
代碼如下:
<!--#include file="conn.asp"-->
<%'數據庫的連接文件我就不多說(shuō)了%> <html>
<head>
<title>管理新聞</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../index/style.css" type="text/css">
<script>
function del () //用于判斷記錄有沒(méi)有選中的函數
{
var flag=true;
var temp="";
var tmp;
if((document.form1.answer.length+"")=="undefined") {tmp=1}else{tmp=document.form1.answer.length}
if (tmp==1){
if (document.form1.answer.checked){
flag=false;
temp=document.form1.answer.value
}
}else{
for (i=0;i<document.form1.answer.length;i++) {
if (document.form1.answer[i].checked){
if (temp==""){
flag=false;
temp=document.form1.answer[i].value
}else{
flag=false;
temp = temp +","+ document.form1.answer[i].value
}
}
}
}
if (flag){ alert("對不起，你還沒(méi)有選擇！")}
else{ name=document.form1.name.value
//alert(name)
if (confirm("確實(shí)要刪除？")){
window.location="delnews.asp?id=" + temp;
}
}
return !flag;
}
</script>
</head>
<body>
<script language=Javascript>
function checkall(all)//用于判斷全選記錄的函數
{
var a = document.getElementsByName("answer");
for (var i=0; i<a.length; i++) a[i].checked = all.checked;
}
</script>
<%
set rs=server.createobject("adodb.recordset")
sql="select * from news order by addtime desc"
rs.open sql,conn,1,3 %>
<% if rs.eof then %>
<table width="50%" border="0" align="center" ID="Table2">
<tr>
<td align="center">
沒(méi)有新聞！
</tr>
</table>
<% else %>
<form method="POST" id=form1 name=form1>
<table width="90%" border="0" align="center" class="tabDocborder" ID="Table3">
<tr>
<td>
<table width="80%" align="center" id=TabDocMain border='1' cellspacing='0' cellpadding='0' bordercolorlight='#82b4dd' bordercolor='#b6d3eb' class="TabDocMain">
<thead>
<tr>
<td colspan="7" align="center">
新聞管理中心
</td>
</tr>
</thead>
<tbody>
<tr>
<td align=center>
刪除框
</td>
<td align=center>
新聞標題
</td>
<td align=center>
發(fā)布時(shí)間
</td>
<td align=center>
管理
</td>
</tr>
<%
do while not rs.eof
%>
<tr>
<td align=center><input type="checkbox" name="answer" value="<%=rs("id")%>" ID="Checkbox1">
</td>
<td align=left><%If Len(rs("title"))<=30 Then%><%=rs("title")%><%else%>
<%=(Left(rs("title"),30))%>...
<%end if %></td>
<td align=left><%=rs("addtime")%></td>
<td align=center><a href="editnews.asp?id=<%=rs("id")%>">編 輯</a></td>
</tr>
</tbody>
<%
rs.movenext
loop
%>
<tr>
<td colspan="7" align="center">
<input type="checkbox" name="chkall" value="on" onclick="checkall(this)" ID="Checkbox2">選中所有的顯示新聞
<input type="button" name="btnDelete" value="刪除" style='font-family: 宋體; font-size: 9pt;' onclick="del()" ID="Button1">
</td>
</tr>
</table>
</form>
</td>
</tr>
<%end if%>
</table>
<% set rs=nothing
conn.close
set conn=nothing
%>
</body>
</html>
delnews.asp文件
代碼如下:
<!--#include file="conn.asp"-->
<%
arrdel=Request("id")
'Response.Write arrdel
sql="delete from news where id in ("&arrdel&")"
'Response.Write sql
conn.Execute sql
set conn=nothing
response.write"<SCRIPT language=JavaScript>alert('刪除成功！');"
response.write"javascript: history.go(-1)</SCRIPT>"
response.end
%>
免責聲明：本站發(fā)布的內容（圖片、視頻和文字）以原創(chuàng )、來(lái)自本網(wǎng)站內容采集于網(wǎng)絡(luò )互聯(lián)網(wǎng)轉載等其它媒體和分享為主，內容觀(guān)點(diǎn)不代表本網(wǎng)站立場(chǎng)，如侵犯了原作者的版權，請告知一經(jīng)查實(shí)，將立刻刪除涉嫌侵權內容，聯(lián)系我們QQ:712375056，同時(shí)歡迎投稿傳遞力量。
Copyright ? 2009-2022 56dr.com. All Rights Reserved. 特網(wǎng)科技 特網(wǎng)云 版權所有 特網(wǎng)科技 粵ICP備16109289號
域名注冊服務(wù)機構:阿里云計算有限公司（萬(wàn)網(wǎng)） 域名服務(wù)機構：煙臺帝思普網(wǎng)絡(luò )科技有限公司（DNSPod） CDN服務(wù)：阿里云計算有限公司 百度云 中國互聯(lián)網(wǎng)舉報中心 增值電信業(yè)務(wù)經(jīng)營(yíng)許可證B2
建議您使用Chrome、Firefox、Edge、IE10及以上版本和360等主流瀏覽器瀏覽本網(wǎng)站
