Unter ASP gibt es zwei Möglichkeiten, Daten stapelweise zu löschen, zu denen auch die Funktion des Löschens von Anhängen gehört. Methode eins:
Kopieren Sie den Codecode wie folgt:
id=request.form(checkbox)
id=Split(id,,)
shu=0
für i=0 bis UBound(id)
sql=select * from jiang_fname where id=&id(i)
set rs=conn.execute(sql)
wenn nicht rs.eof dann
delete_file(rs(fname))
Ende wenn
rs.close
setze rs=nichts
sql=löschen aus jiang_fname, wobei id=&id(i)
conn.execute sql,shu1
shu=shu+1
nächste
wenn shu>0 dann
Response.Write(<script>alert('Löschen erfolgreich');location.href='&url&';</script>)
anders
Response.write(<Script>alert('Löschen fehlgeschlagen');javascript: History.back();</script>)
Ende wenn
Verbindung schließen
setze conn=nichts
Methode 2: Verwenden Sie das Schlüsselwort in geschickt, um eine Stapellöschung von Daten zu erreichen
managenews.asp
Kopieren Sie den Codecode wie folgt:
<!--#include file=conn.asp-->
<%'Ich werde nicht mehr über die Datenbankverbindungsdatei sagen%> <html>
<Kopf>
<title>Nachrichten verwalten</title>
<meta http-equiv=Content-Type content=text/html;
<link rel=stylesheet href=../index/style.css type=text/css>
<Skript>
Funktion del () // Funktion zur Bestimmung, ob der Datensatz ausgewählt ist
{
var flag=true;
var temp=;
var tmp;
if((document.form1.answer.length+)==undefiniert) {tmp=1}else{tmp=document.form1.answer.length}
if (tmp==1){
if (document.form1.answer.checked){
flag=false;
temp=document.form1.answer.value
}
}anders{
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
}anders{
flag=false;
temp = temp +,+ document.form1.answer[i].value
}
}
}
}
if (flag){ Alert(Sie haben leider noch keine Wahl!)}
else{ name=document.form1.name.value
//alarm(name)
if (bestätigen(Möchten Sie wirklich löschen?)){
window.location=delnews.asp?id= + temp;
}
}
return !flag;
}
</script>
</head>
<Körper>
<Skriptsprache=Javascript>
Funktion checkall(all)//Funktion zum Ermitteln aller ausgewählten Datensätze
{
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>
Keine Neuigkeiten!
</tr>
</table>
<% sonst %>
<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>
Nachrichtenmanagementzentrum
</td>
</tr>
</thead>
<tbody>
<tr>
<td align=center>
Feld löschen
</td>
<td align=center>
Schlagzeile
</td>
<td align=center>
Release-Zeit
</td>
<td align=center>
verwalten
</td>
</tr>
<%
tun, während nicht 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)%>>Bearbeiten</a></td>
</tr>
</tbody>
<%
rs.movenext
Schleife
%>
<tr>
<td colspan=7 align=center>
<input type=checkbox name=chkall value=on onclick=checkall(this) ID=Checkbox2>Wählen Sie alle angezeigten Nachrichten aus
<input type=button name=btnDelete value=Delete style='font-family: 宋体; onclick=del() ID=Button1>
</td>
</tr>
</table>
</form>
</td>
</tr>
<%end if%>
</table>
<% set rs=nothing
Verbindung schließen
setze conn=nichts
%>
</body>
</html>
delnews.asp-Datei
Kopieren Sie den Codecode wie folgt:
<!--#include file=conn.asp-->
<%
arrdel=Anfrage(id)
'Antwort.Antwort schreiben
sql=aus den Nachrichten löschen, in denen die ID enthalten ist (&arrdel&)
'Response.Write sql
conn.SQL ausführen
setze conn=nichts
Response.write<SCRIPT language=JavaScript>alert('Erfolgreich gelöscht!');
Response.writejavascript: History.go(-1)</SCRIPT>
Antwort.Ende
%>