师改旅师长怎么办:批量删除的怪问题
来源:百度文库 编辑:查人人中国名人网 时间:2024/10/04 18:47:56
显示操作页面:
<SCRIPT language=javascript>
function unselectall()
{
if(document.del.chkAll.checked){
document.del.chkAll.checked = document.del.chkAll.checked&0;
}
}
function CheckAll(form)
{
for (var i=0;i<form.elements.length;i++)
{
var e = form.elements[i];
if (e.Name != "chkAll")
e.checked = form.chkAll.checked;
}
}
function ConfirmDel()
{
if(confirm("谨慎操作,你进行的是批量删除!"))
return true;
else
return false;
}
</SCRIPT>
<%set r=server.createobject("adodb.recordset")...%>读数据...
<form name="del" method="post" action="alldel.asp" onSubmit="return ConfirmDel();">
<input name=""ID"" type=""checkbox"" onClick=""unselectall()"" id=""ID"" value="&r("id")&">
<input name="chkAll" type="checkbox" id="chkAll" onclick=CheckAll(this.form) value="checkbox">
选中本页显示的所有信息 <input name="submit" type='submit' value='删除选定的信息' >
</form>
.................................
alldel.asp页面如下:
<!--#include file="conn.asp"-->
<%
set reco=server.createobject("ADODB.recordset")
sqlstr="delete from zx where id="&("id")&""
reco.open sqlstr,conn
reco.close
set conn=nothing
Response.Redirect "1.asp"
Response.end
%>
.........................
现在出现问题是
没有选中的情况下直接点 删除选定的信息 就把数据库里的信息全部删除了
另外alldel.asp页面报错
Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp,行242
ADODB.Recordset 错误 '800a0e78'
对象关闭时,不允许操作。
admin/alldel.asp,行8
<SCRIPT language=javascript>
function unselectall()
{
if(document.del.chkAll.checked){
document.del.chkAll.checked = document.del.chkAll.checked&0;
}
}
function CheckAll(form)
{
for (var i=0;i<form.elements.length;i++)
{
var e = form.elements[i];
if (e.Name != "chkAll")
e.checked = form.chkAll.checked;
}
}
function ConfirmDel()
{
if(confirm("谨慎操作,你进行的是批量删除!"))
return true;
else
return false;
}
</SCRIPT>
<%set r=server.createobject("adodb.recordset")...%>读数据...
<form name="del" method="post" action="alldel.asp" onSubmit="return ConfirmDel();">
<input name=""ID"" type=""checkbox"" onClick=""unselectall()"" id=""ID"" value="&r("id")&">
<input name="chkAll" type="checkbox" id="chkAll" onclick=CheckAll(this.form) value="checkbox">
选中本页显示的所有信息 <input name="submit" type='submit' value='删除选定的信息' >
</form>
.................................
alldel.asp页面如下:
<!--#include file="conn.asp"-->
<%
set reco=server.createobject("ADODB.recordset")
sqlstr="delete from zx where id="&("id")&""
reco.open sqlstr,conn
reco.close
set conn=nothing
Response.Redirect "1.asp"
Response.end
%>
.........................
现在出现问题是
没有选中的情况下直接点 删除选定的信息 就把数据库里的信息全部删除了
另外alldel.asp页面报错
Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp,行242
ADODB.Recordset 错误 '800a0e78'
对象关闭时,不允许操作。
admin/alldel.asp,行8
sqlstr="delete from zx where id="&("id")&""
这句话改成这样试试
sqlstr="delete from zx where id="&Cint(Reqeust.form("id"))&""