ASP でデータを一括削除するには 2 つの方法があり、添付ファイルの削除機能も含まれます。方法 1:
次のようにコードをコピーします。
id=リクエスト.フォーム(チェックボックス)
id=分割(id,,)
シュウ=0
i=0 から UBound(id) まで
sql=select * from jiang_fname where id=&id(i)
set rs=conn.execute(sql)
そうでない場合は、
delete_file(rs(fname))
終了する場合
rs.close
rs=何も設定しない
sql=jiang_fname から削除 (id=&id(i))
conn.SQL を実行,shu1
シュウ=シュウ+1
次
shu>0 の場合
response.Write(<script>alert('削除成功');location.href='&url&';</script>)
それ以外
response.write(<Script>alert('削除に失敗しました');javascript:history.back();</script>)
終了する場合
接続閉じる
conn=何も設定しない
方法 2: in キーワードを巧みに使用してデータの一括削除を実現する
管理ニュース.asp
次のようにコードをコピーします。
<!--#include file=conn.asp-->
<%'データベース接続ファイルについてはこれ以上説明しません%> <html>
<頭>
<title>ニュースの管理</title>
<meta http-equiv=コンテンツタイプ content=text/html;
<リンク rel=stylesheet href=../index/style.css type=text/css>
<スクリプト>
function del () //レコードが選択されているかどうかを判断するために使用される関数
{
var フラグ = true;
変数温度=;
var tmp;
if((document.form1.answer.length+)==unknown) {tmp=1}else{tmp=document.form1.answer.length}
if (tmp==1){
if (document.form1.answer.checked){
フラグ = false;
temp=document.form1.answer.value
}
}それ以外{
for (i=0;i<document.form1.answer.length;i++) {
if (document.form1.answer[i].checked){
if (温度==){
フラグ = false;
temp=document.form1.answer[i].value
}それ以外{
フラグ = false;
temp = temp +,+ document.form1.answer[i].value
}
}
}
}
if (フラグ){ アラート(申し訳ありませんが、まだ選択の余地はありません!)}
else{ name=document.form1.name.value
//アラート(名前)
if (confirm(本当に削除しますか?)){
window.location=delnews.asp?id= + temp;
}
}
!フラグを返します。
}
</script>
</head>
<本文>
<スクリプト言語=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 %>
<テーブル幅=50% ボーダー=0 整列=センター ID=テーブル2>
<tr>
<td align=center>
ニュースはありません！
</tr>
</テーブル>
<% その他 %>
<フォームメソッド=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' cellpacing='0' cellpadding='0' bordercolorlight='#82b4dd' bordercolor='#b6d3eb' class=TabDocMain>
<頭>
<tr>
<tdcolspan=7 align=center>
ニュース管理センター
</td>
</tr>
</thead>
<本体>
<tr>
<td align=center>
ボックスの削除
</td>
<td align=center>
ニュースの見出し
</td>
<td align=center>
リリース時間
</td>
<td align=center>
管理
</td>
</tr>
<%
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
ループ
%>
<tr>
<tdcolspan=7 align=center>
<input type=checkbox name=chkall value=on onclick=checkall(this) ID=Checkbox2>表示されているニュースをすべて選択します
<input type=button name=btnDelete value=Delete style='font-family: font-size: 9pt;' onclick=del() ID=Button1>
</td>
</tr>
</テーブル>
</form>
</td>
</tr>
<%end if%>
</テーブル>
<% set rs=nothing
接続閉じる
conn=何も設定しない
%>
</body>
</html>
delnews.asp ファイル
次のようにコードをコピーします。
<!--#include file=conn.asp-->
<%
arrdel=リクエスト(id)
'応答.ardel を書き込みます
sql=id が (&arrdel&) にあるニュースから削除
'応答.SQL の書き込み
conn.SQLを実行する
conn=何も設定しない
response.write<SCRIPT language=JavaScript>alert('削除に成功しました!');
response.writejavascript:history.go(-1)</SCRIPT>
応答.終了
%>