dim id
id=trim(Request("id"))
if id="" then
response.Write("<SCRIPT language=JavaScript>alert('请指定要删除的数据编号!');")
response.Write("javascript:history.go(-1)</SCRIPT>")
end if
if instr(id,",")>0 then
id=replace(id," ","")
sql="Select * from 表 where id in (" & id & ")"
else
id=clng(id)
sql="select * from 表 where id=" & id
end if
Set rs=Server.CreateObject("Adodb.RecordSet")
rs.Open sql,conn,1,3
do while not rs.eof
rs.delete
rs.movenext
loop
rs.close
set rs=nothing
function unselectall()
{
if(document.myform.chkAll.checked){
document.myform.chkAll.checked = document.myform.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.disabled!=true)
e.checked = form.chkAll.checked;
}
}
function del()
{
document.form2.action="gameEdit.asp?action=del";
document.form2.submit()
}