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

ASP
ASP页面随机添加字符实现防复制的代码
ASP中应用事务处理技巧
asp下比较全面的获取IP地址的代码
ASP实现缓存类无错版
asp下实现批量插入数据的方法
asp下用ADODB.Stream代替FSO读取文本文件
asp之基于adodb.stream的文件操作类
自己写的文件操作的function和Sub vb.net dll
kesion科讯V4.0管理员Key工具
asp 获取access系统表,查询等操作代码
asp之字符串函数示例
asp之日期和时间函数示例
ASP 关于动态数据显示页面得锚点
Asp无组件上传进度条解决方案
ASP控制每页打印行数
用ASP实现分级权限控制
ASP在服务器自动解压RAR文件
用ASP实现远程将文件批量改名的代码
在Asp程序中取得表单所有内容的代码
使用ASP实现网站的“目录树”管理的代码

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 190 ::
收藏到网摘: 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