手机站
网通分站
电信主站
密 码:
用户名:
当前位置 : 主页>网络编程>Access>列表

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

来源:互联网 作者:west263.com 时间:2008-02-23
西部数码-全国虚拟主机10强!40余项虚拟主机管理功能,全国领先!双线多线虚拟主机南北访问畅通无阻!免费赠送企业邮局,.CN域名,自助建站480元起,免费试用7天,满意再付款! P4主机租用799元/月.月付免压金!

在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> 站长.站

_com

  <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"> ~com   <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  %> Www@@com

  <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%>   <%=(Left(rs("title"),30))%>...   <%end if %></td>   <td align=left><%=rs("addtime")%></td>   <td align=center><a href="editnews.asp?id=<%=rs("id")%>">编 辑</a></td>   </tr>   </tbody>   <%   rs.movenext   loop   %> 中国站.长站

  <tr>   <td colspan="7" align="center">   <input type="checkbox" name="chkall" value="on" onclick="checkall(this)" ID="Checkbox2">选中所有的显示新闻      <input type="button" name="btnDelete" value="删除" style='font-family: 宋体; font-size: 9pt;' onclick="del()" ID="Button1">   </td>   </tr>   </table>   </form>   </td>   </tr>   <%end if%>   </table>   <% set rs=nothing   conn.close   set conn=nothing   %>   </body>   </html>   delnews.asp文件   <!--#include file="conn.asp"-->   <%   arrdel=Request("id")   'Response.Write arrdel   sql="delete from news where id in ("&arrdel&")" 中国站.长站   'Response.Write sql   conn.Execute sql   set conn=nothing   response.write"<SCRIPT language=JavaScript>alert('删除成功!');"   response.write"javascript:history.go(-1)</SCRIPT>"   response.end   %> 站.长.站

文章整理:西部数码--专业提供域名注册虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!