当前位置: 首页 > 图文教程 > 网络编程 > ASP > 巧用in关键字实现数据的批量删除

ASP
Access 2000 数据库 80 万记录通用快速分页类
Microsoft JET Database Engine 错误 ''80004005'' 未指定的错误的完美解决方法
收藏的ASP常用的函数集
asp分页的一个类
ASP开发网页牢记注意事项
ASP下操作Excel技术总结分析
ASP数据岛操作类
ASP经典分页类
asp论坛在线人数统计研究
ASP调用SQL SERVER存储程序
asp输出bmp
ASP连接数据库的全能代码
ASP面向对象编程探讨及比较
web文件管理器的后续开发
一小偷类!!有兴趣的可以看看
利用ASP实现事务处理的方法
大数量查询分页显示 微软的解决办法
如何把ASP编写成DLL
asp实现树型结构
超级ASP大分页_我的类容我做主

ASP 中的 巧用in关键字实现数据的批量删除


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 233 ::
收藏到网摘: n/a

 

巧用in关键字实现数据的批量删除
在WEB编程中经常会碰到数据的批量删除。我们通常的做法是通过循环来实现数据的批量的删除。但是一个程序模块循环用的太多那么这个程序模块的质量就会下降。因此本文就介绍通过巧用in关键字来实现数据的批量删除。
让我们通过一个例子来讲解IN关键字的数据批量删除
假如我们要删除这个页面的数据:相关代码如下:
managenews.asp <!--#include file="conn.asp"-->
<%'数据库的连接文件我就不多说了%> <html>
<head>
<title>管理新闻</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../index/style.css" type="text/css">
<script>
function del ()  //用于判断记录有没有选中的函数
{
var flag=true;
var temp="";
var  tmp;
if((document.form1.answer.length+"")=="undefined") {tmp=1}else{tmp=document.form1.answer.length}
if (tmp==1){
if (document.form1.answer.checked){
    flag=false;
  temp=document.form1.answer.value
}
}else{
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
 }else{
 flag=false;
 temp = temp +","+ document.form1.answer[i].value
 }
 }
 }
 }
if (flag){ alert("对不起,你还没有选择!")}
else{   name=document.form1.name.value
        //alert(name)
          if (confirm("确实要删除?")){
        window.location="delnews.asp?id=" + temp;
}
}
return !flag;
}
</script>
</head>
<body>
<script language=Javascript>
function checkall(all)//用于判断全选记录的函数
{
  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">
    没有新闻!
  </tr>
</table>
<% else %>
<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">
     新闻管理中心
    </td>
  </tr>
  </thead>
  <tbody>
  <tr>
     <td align=center>
      删除框
    </td>
    <td align=center>
新闻标题
    </td>
    <td align=center>
发布时间
    </td>
    <td  align=center>
     管理
    </td>
  </tr>
   <% 
      do while not 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