asp 批量删除问题求教 10
我希望对数据库读取的记录做批量操作:全选/删除,现在能够全选,但是不能删除,请求帮助!代码页:index.asp,user_delall.asp,conn.asp,由于里...
我希望对数据库读取的记录做批量操作:全选/删除,现在能够全选,但是不能删除,请求帮助!代码页:index.asp,user_delall.asp,conn.asp,由于里面的修改、单记录删除、添加均正常,所以不附代码,数据库表分:id,name1,sex,old四个字段,表名:mysf_user
index.asp代码
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>用户管理</title>
<link rel="stylesheet" type="text/css">
<!--全选函数-->
<script language=javascript>
var t=false;
function SelectAll()
{
t=!t;
for(var i=0;i<document.form1.elements.length;i++)
{
if (document.form1.elements[i].type=="checkbox")
{
document.form1.elements[i].checked=t;
}
}
}
</script>
</head>
<body leftmargin="8" topmargin="8">
<%
set rs=server.CreateObject("ADODB.RecordSet")
Source="select * from mysf_user order by id"
rs.Open Source,conn,1,1
%>
<table width="98%" border="0" cellpadding="2" cellspacing="1" bgcolor="#D1DDAA"
align="center" style="margin-top:8px">
<tr bgcolor="#E7E7E7">
<td height="24" colspan="10"> 用户列表 </td>
</tr>
<tr align="center" bgcolor="#FAFAF1" height="22">
<td width="6%">ID</td>
<td width="4%">选择</td>
<td width="28%">姓名</td>
<td width="10%">性别</td>
<td width="10%">年龄</td>
<td width="10%">操作</td>
</tr>
<%
if rs.eof and rs.bof then
response.Write("暂时没有数据")
else
Do Until rs.Eof
%>
<!--读取记录-->
<form name="form1" id="form1" action="user_addsave.asp">
<tr align='center' bgcolor="#FFFFFF" onMouseMove="javascript:this.bgColor='#FCFDEE';"
onMouseOut="javascript:this.bgColor='#FFFFFF';" height="22" >
<td><%=rs("id")%></td>
<td><input name="ids" type="checkbox" id="ids" value="101" class="np" value="<%=rs
("id")%>">
</td>
<td><%=rs("name1")%></td>
<td><%=rs("sex")%></td>
<td><%=rs("old")%></td>
<td><a href="user_edit.asp?id=<%=rs("id")%>">修改</a> | <a href="user_del.asp?
id=<%=rs("id")%>">删除</a></td>
</tr>
<%
rs.MoveNext
Loop
end if
%>
<tr align='center' height="22" >
<td></td>
<td></td>
<td><input name="name1" type="text" id="name1"></td>
<td><input name="sex" type="text" id="sex"></td>
<td><input name="old" type="text" id="old"></td>
<td><input type="submit" value="保存"></td>
</tr>
</form>
<!--全选删除按钮-->
<form method="post" action="user_delall.asp" name="form2" id="form2">
<tr bgcolor="#FAFAF1">
<td height="28" colspan="10">
<input type="button" name="chek" value="全选" id="chek" onClick="SelectAll()">
<input type="submit" name="del" id="del" value="删除">
</td>
</tr>
</form>
</table>
<%
rs.close
set rs=nothing
%>
</body>
</html>
user_delall.asp代码
<!--#include file="conn.asp"-->
<%
set rs=server.CreateObject("ADODB.RecordSet")
Source="select * from mysf_user where id in("&id&")"
rs.Open Source,conn,1,3
rs.delete
response.write "<script>alert('用户删除成功!');window.location.href='index.asp';</script>"
%>
问题已经解决了,谢谢各位的热心帮助! 展开
index.asp代码
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>用户管理</title>
<link rel="stylesheet" type="text/css">
<!--全选函数-->
<script language=javascript>
var t=false;
function SelectAll()
{
t=!t;
for(var i=0;i<document.form1.elements.length;i++)
{
if (document.form1.elements[i].type=="checkbox")
{
document.form1.elements[i].checked=t;
}
}
}
</script>
</head>
<body leftmargin="8" topmargin="8">
<%
set rs=server.CreateObject("ADODB.RecordSet")
Source="select * from mysf_user order by id"
rs.Open Source,conn,1,1
%>
<table width="98%" border="0" cellpadding="2" cellspacing="1" bgcolor="#D1DDAA"
align="center" style="margin-top:8px">
<tr bgcolor="#E7E7E7">
<td height="24" colspan="10"> 用户列表 </td>
</tr>
<tr align="center" bgcolor="#FAFAF1" height="22">
<td width="6%">ID</td>
<td width="4%">选择</td>
<td width="28%">姓名</td>
<td width="10%">性别</td>
<td width="10%">年龄</td>
<td width="10%">操作</td>
</tr>
<%
if rs.eof and rs.bof then
response.Write("暂时没有数据")
else
Do Until rs.Eof
%>
<!--读取记录-->
<form name="form1" id="form1" action="user_addsave.asp">
<tr align='center' bgcolor="#FFFFFF" onMouseMove="javascript:this.bgColor='#FCFDEE';"
onMouseOut="javascript:this.bgColor='#FFFFFF';" height="22" >
<td><%=rs("id")%></td>
<td><input name="ids" type="checkbox" id="ids" value="101" class="np" value="<%=rs
("id")%>">
</td>
<td><%=rs("name1")%></td>
<td><%=rs("sex")%></td>
<td><%=rs("old")%></td>
<td><a href="user_edit.asp?id=<%=rs("id")%>">修改</a> | <a href="user_del.asp?
id=<%=rs("id")%>">删除</a></td>
</tr>
<%
rs.MoveNext
Loop
end if
%>
<tr align='center' height="22" >
<td></td>
<td></td>
<td><input name="name1" type="text" id="name1"></td>
<td><input name="sex" type="text" id="sex"></td>
<td><input name="old" type="text" id="old"></td>
<td><input type="submit" value="保存"></td>
</tr>
</form>
<!--全选删除按钮-->
<form method="post" action="user_delall.asp" name="form2" id="form2">
<tr bgcolor="#FAFAF1">
<td height="28" colspan="10">
<input type="button" name="chek" value="全选" id="chek" onClick="SelectAll()">
<input type="submit" name="del" id="del" value="删除">
</td>
</tr>
</form>
</table>
<%
rs.close
set rs=nothing
%>
</body>
</html>
user_delall.asp代码
<!--#include file="conn.asp"-->
<%
set rs=server.CreateObject("ADODB.RecordSet")
Source="select * from mysf_user where id in("&id&")"
rs.Open Source,conn,1,3
rs.delete
response.write "<script>alert('用户删除成功!');window.location.href='index.asp';</script>"
%>
问题已经解决了,谢谢各位的热心帮助! 展开
3个回答
展开全部
if instr(id,",")>0 then
sqldel="DELETE from mysf_user where id in ("& id &")"
conn.execute(sqldel)
response.write "<script> alert('删除成功');window.location.href='?'</script>"
response.End()
else
else
sqldel="DELETE from mysf_user where id ="&id
conn.execute(sqldel)
response.write "<script> alert('删除成功');window.location.href='?'</script>"
response.End()
end if
end if
sqldel="DELETE from mysf_user where id in ("& id &")"
conn.execute(sqldel)
response.write "<script> alert('删除成功');window.location.href='?'</script>"
response.End()
else
else
sqldel="DELETE from mysf_user where id ="&id
conn.execute(sqldel)
response.write "<script> alert('删除成功');window.location.href='?'</script>"
response.End()
end if
end if
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
你可以用控件做,FORM VIEW
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
user_delall.asp
这个页面少一个获取id这个变量值的程序代码。问题出在这
这个页面少一个获取id这个变量值的程序代码。问题出在这
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询