那个高手帮我看一下，删除单条数据可以，选定多条就删除不了！
<!--#include file="../Include/Conn.asp" --><!--#include file="seeion.asp"-->
<!--#include file="page.asp" -->
<%call chkAdmin(16)
id=request.QueryString("id")
key=request.QueryString("key")%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.
<html xmlns="http://www.
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<link rel="stylesheet" type="text/css" id="css" href="images/style.css">
<title>管理团队成员</title>
<link rel="stylesheet" href="../zycheditor/themes/default/default.css" />
<link rel="stylesheet" href="../zycheditor/plugins/code/prettify.css" />
<script charset="utf-8" src="../zycheditor/kindeditor.js"></script>
<script charset="utf-8" src="../zycheditor/lang/zh_CN.js"></script>
<script charset="utf-8" src="../zycheditor/plugins/code/prettify.js"></script>
<script>
KindEditor.ready(function(K) {
var editor1 = K.create('textarea[name="body"]', {
cssPath : '../zycheditor/plugins/code/prettify.css',
uploadJson : '../zycheditor/asp/upload_json.asp',
fileManagerJson : '../zycheditor/asp/file_manager_json.asp',
allowFileManager : true,
afterCreate : function() {
var self = this;
K.ctrl(document, 13, function() {
self.sync();
K('form[name=add]')[0].submit();
});
K.ctrl(self.edit.doc, 13, function() {
self.sync();
K('form[name=add]')[0].submit();
});
}
});
prettyPrint();
});
</script>
<script>
KindEditor.ready(function(K) {
var editor = K.editor({
fileManagerJson : '../zycheditor/asp/file_manager_json.asp'
});
K('#filemanager').click(function() {
editor.loadPlugin('filemanager', function() {
editor.plugin.filemanagerDialog({
viewType : 'VIEW',
dirName : 'image',
clickFn : function(url, title) {
K('#url').val(url);
editor.hideDialog();
}
});
});
});
});
<!--
function CheckAll(){
for (var i=0;i<eval(form.elements.length);i++){
var e=form.elements[i];
if (e.name!="allbox") e.checked=form.allbox.checked;
}
}
-->
</script>
</head>
<body>
<%if request.querystring("action")="admin" then%>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC">
<tr>
<td height="30" background="images/bg_list.gif"><div style="padding-left:10px; font-weight:bold; color:#FFFFFF">管理团队成员</div></td>
</tr>
<tr>
<td colspan="2">
<table width="100%" border="0" cellpadding="5" cellspacing="0" class="stable">
<thead><tr>
<td width="20" align="center" class="td"><input type="checkbox" /></td>
<td width="40" align="center" class="td">ID</td>
<td width="140" align="center" class="td">分 类</td>
<td width="127" align="center" class="td">照 片</td>
<td width="90" align="center" class="td">姓 名</td>
<td width="142" align="center" class="td">职 务</td>
<td width="177" align="center" class="td">博客地址</td>
<td width="71" align="center" class="td">排序</td>
<td width="100" align="center" class="td">修 改</td>
<td width="100" align="center" class="td">删 除</td>
</tr></thead>
<form id="form" name="form" method="post" action="?del=checkbox">
<%set rs=server.createobject("adodb.recordset")
exec="select * from tuandui order by px_id asc"
rs.open exec,conn,1,1
if rs.eof then
response.write ("<div style=""padding:10px;"">暂无成员!</div>")
else
rs.PageSize =10 '每页记录条数
iCount=rs.RecordCount '记录总数
iPageSize=rs.PageSize
maxpage=rs.PageCount
page=request("page")
if Not IsNumeric(page) or page="" then
page=1
else
page=cint(page)
end if
if page<1 then
page=1
elseif page>maxpage then
page=maxpage
end if
rs.AbsolutePage=Page
if page=maxpage then
x=iCount-(maxpage-1)*iPageSize
else
x=iPageSize
end if
for i=1 to rs.pagesize %>
<tr>
<td height="38" align="center" class="td"><input name="ID" type="checkbox" id="ID" value="<%=rs("id")%>" /></td>
<td align="center" class="td"><input name="id" type="text" readonly style="text-align:center; width:40px" value="<%=rs("id")%>"/></td>
<td align="center" class="td">
<%
dim rsc
set rsc=server.CreateObject("adodb.recordset")
rsc.open "select * from tuandui_class",conn,1,1
while not rsc.eof
if rs("ssfl")=rsc("id") then
response.Write("<a href=""xiugai_tuandui.asp?id=" & rsc("id") & """><font color=#003399>[" & rsc("title") & "]</font></a>")
end if
rsc.movenext
wend
rsc.close
set rsc=nothing
%>
</td>
<td align="center" class="td"><a href="<%=rs("img")%>" target="_blank"><img src="<%=rs("img")%>" alt="点击查看大图" width="60" height="60" border="0" /></a></td>
<td align="center" class="td"><%=rs("name")%></td>
<td align="center" class="td"><%=rs("zw")%></td>
<td align="center" class="td">[<a href="http://<%=rs("url")%>" target="_blank" style="color:#003399">访问</a>]</td>
<td align="center" class="td"><input name="px_id" type="text" style="text-align:center; width:40px" value="<%=rs("px_id")%>"/></td>
<td align="center" class="td"><input type="button" name="Submit3" value="修改" onclick="window.location.href='xiugai_tuandui.asp?id=<%=rs("id")%>' " class="btn"/></td>
<td align="center" class="td"><input type="button" name="Submit" value="删除" onclick="javascript:if(confirm('确定删除？删除后不可恢复!')){window.location.href='admin_tuandui.asp?act=del&id=<%=rs("id")%>';}else{history.go(0);}" class="btn"/></td>
</tr>
<%rs.movenext
if rs.eof then exit for
next
end if%>
<tr>
<td width="20" height="30" align="center"><input type="checkbox" name="allbox" onclick="CheckAll()" /></td>
<td width="40" height="30" align="center">全选</td>
<td height="30" colspan="8"><label>
<input type="submit" class="btn" onclick="form.action='?action=del';" value="删除选定成员"/>
<input type="submit" class="btn" onclick="form.action='?action=ordsc';" value="更新排序"/>
</label><%call PageControl(iCount,maxpage,page,"border=0 align=right","<p align=right>")
rs.close
set rs=nothing
%></td>
</tr>
</form>
</table>
</td>
</tr>
</table>
<%end if%>
<%if request.querystring("action")="add" then%>
<form name="add" method="post" action="admin_tuandui.asp?action=add&add=ok">
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC">
<tr>
<td height="30" background="images/bg_list.gif"><div style="padding-left:10px; font-weight:bold; color:#FFFFFF">增加团队成员</div></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">
<table width="100%" border="0" align="center" cellpadding="5" cellspacing="0" class="stable" >
<tr >
<td width="10%" height="28" align="right" class="td"><font color="#FF0000">*</font>姓 名</td>
<td class="td"><input name="name" type="text" size="40" /></td>
</tr>
<tr>
<td width="10%" height="13" align="right" class="td"><font color="#FF0000">*</font>团队分类</td>
<td class="td"><select name="ssfl" id="select">
<%set rsc=server.CreateObject("adodb.recordset")
rsc.open "select * from tuandui_class",conn,1,1
while not rsc.eof
response.Write("<option value=""" & rsc("id") & """>" & rsc("title") & "</option>")
rsc.movenext
wend
rsc.close
set rsc=nothing%>
</select></td>
</tr>
<tr>
<td width="10%" height="13" align="right" class="td"><font color="#FF0000">*</font>职 务</td>
<td class="td"><input name="zw" type="text" size="40" /></td>
</tr>
<tr>
<td height="13" align="right" class="td"><font color="#FF0000">*</font>照 片</td>
<td class="td"><table width="200" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><input type="text" id="url" name="img" value="../images/zwtp.jpg" size="40" /></td>
<td><input type="button" class="btn2" id="filemanager" value="选取已上传图片" /></td>
<td><iframe src="up.asp?formname=add&inputname=img&uploadstyle=tuandui" frameborder="0" scrolling="no" width="350" height="25"></iframe></td>
</tr>
</table></td>
</tr>
<tr>
<td height="25" align="right" class="td"><font color="#FF0000">*</font>排 序</td>
<td class="td"><label>
<%
set rs=server.createobject("adodb.recordset")
rs.open "select max(px_id) as dd from [tuandui]",conn,1,1
if rs.eof and rs.bof then
response.write ""
else
%>
<input name="px_id" type="text" id="1" value="<%=rs("dd")+1%>" size="20" />
<%
end if
rs.close
%>
</label> 注：默认表示排列到最后一位
</td>
</tr>
<tr>
<td height="25" align="right" class="td">个人博客</td>
<td class="td"><input name="url" type="text" value="#" size="60" /></td>
</tr>
<tr>
<td height="25" align="right" class="td"><font color="#FF0000">*</font>专项</td>
<td class="td"><input name="unit" type="text" value="" size="60" /></td>
</tr>
<tr>
<td height="25" align="right" class="td"><font color="#FF0000">*</font>个人简介</td>
<td class="td"><textarea name="body" style="width:700px;height:200px;visibility:hidden;"></textarea></td>
</tr>
<tr>
<td height="12" align="right" class="td"> </td>
<td class="td"><input type="submit" name="button" id="button" value="确认提交" class="btn"/></td>
</tr>
</table>
</td>
</tr>
</table></form>
<%end if%>
</body>
</html>
<%
if request("act")="del" then
id=request("ID")
if id="" then
Response.Write "<script language='javascript'>alert('参数错误!');document.location.href('admin_tuandui.asp?action=admin');</script>"
Response.End()
end if
set rs=server.createobject("adodb.recordset")
rs.open "Select * from tuandui where id="&Request("id"),conn,1,3
if rs.bof and rs.eof then
Response.Write "<script language='javascript'>alert('数据库中没有该记录！');document.location.href('admin_tuandui.asp?action=admin');</script>"
Response.End()
else
rs.Delete
rs.Update
Response.Write "<script language='javascript'>alert('当前团队成员删除成功！');document.location.href('admin_tuandui.asp?action=admin');</script>"
end if
end if
%>
<%
if Request.QueryString("action")="ordsc" then
if request.form("px_id")="" then
Response.Write "<script language='javascript'>alert('排序ID不能为空');document.location.href('admin_tuandui.asp?action=admin');</script>"
Response.End()
end if
depname=request.form("px_id")
myarray=Split(depname,", ")
set rs=server.createobject("adodb.recordset")
sql="select * from tuandui order by px_id asc"
rs.open sql,conn,1,3
for i= 0 to Ubound(myarray)
rs("px_id")=myarray(i)
rs.update
rs.movenext
next
rs.close
set rs=nothing
Response.Write "<script>alert('操作成功!');window.location.href='admin_tuandui.asp?action=admin';</script>"
end if
%>
<%
if Request.QueryString("add")="ok" then
set rs=server.createobject("adodb.recordset")
sql="select * from tuandui"
rs.open sql,conn,1,3
name=request.form("name")
zw=request.form("zw")
img=request.form("img")
url=request.form("url")
px_id=request.form("px_id")
unit=request.form("unit")
ssfl=request.form("ssfl")
body=request.form("body")
if name="" then
response.Write("<script language=javascript>alert('姓名不能为空!');history.go(-1)</script>")
response.end
end if
if zw="" then
response.Write("<script language=javascript>alert('职务不能为空!');history.go(-1)</script>")
response.end
end if
if img="" then
response.Write("<script language=javascript>alert('照片不能为空!');history.go(-1)</script>")
response.end
end if
if px_id="" then
response.Write("<script language=javascript>alert('排列顺序不能为空!');history.go(-1)</script>")
response.end
end if
rs.addnew
rs("name")=name
rs("zw")=zw
rs("img")=img
rs("px_id")=px_id
rs("unit")=unit
rs("ssfl")=ssfl
rs("body")=body
rs.update
rs.close
set rs=nothing
conn.close
set rs=nothing
Response.Write "<script>alert('团队增加成功，点击继续增加！');window.location.href='admin_tuandui.asp?action=add';</script>"
end if
%>
