批量复制数据

现有表Special和表view数据结构相同的两个表:


代码如下:

Special
Specialid       NClass        name           pic
1                   黎明          火舞艳阳
2                   张学友      地久天长
3                   陈冠希      同名专辑
4                   郭富城      听风的歌
view
Specialid       NClass        name           pic
1                   黎明          火舞艳阳      photo/200606192321.jpg
2                   张学友      地久天长      photo/200606192327.jpg
3                   刘德华      如果有一天 photo/200606192328.jpg
4                   郭富城      听风的歌      photo/200606192329.jpg

要将VIEW中的PIC数据批量复制到Special中,(歌手名与专辑要完全相同),代码如下:


代码如下:

<% 
   dim conn    
   dim connstr 
   'on error resume next 
   connstr="DBQ="+server.mappath("p#1.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};" 
   set conn=server.createobject("ADODB.CONNECTION") 
On Error Resume Next 
   conn.open connstr  
%> 
<html> 
<head> 
<title>管理软件</title> 
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"> 
</head> 
<body bgcolor="#FFFFFF" text="#000000"  > 
<table width=700 border="0" cellspacing="0" cellpadding="0"  align="center"><% 
   const MaxPerPage=100 
   dim totalPut    
   dim CurrentPage 
   dim TotalPages 
   dim i,j 
   if not isempty(request("page")) then 
      currentPage=cint(request("page")) 
   else 
      currentPage=1 
   end if 
%> 
<% 
set rs=server.CreateObject("adodb.recordset") 
rs.open "select  *  from Special inner join view on Special.name =view.name and Special.NClass=view.NClass",conn,1,1 
  if rs.eof and rs.bof then 
       response.write "<p align=center class=font>暂无软件</p>" 
   else 
   totalPut=rs.recordcount 
      totalPut=rs.recordcount 
      if currentpage<1 then 
          currentpage=1 
      end if 
      if (currentpage-1)*MaxPerPage>totalput then 
    if (totalPut mod MaxPerPage)=0 then 
      currentpage= totalPut MaxPerPage 
    else 
       currentpage= totalPut MaxPerPage + 1 
    end if 
      end if 
       if currentPage=1 then 
            showContent 
            showpage totalput,MaxPerPage,"l.asp" 
       else 
          if (currentPage-1)*MaxPerPage<totalPut then 
            rs.move  (currentPage-1)*MaxPerPage 
            dim bookmark 
            bookmark=rs.bookmark 
            showContent 
             showpage totalput,MaxPerPage,"l.asp" 
        else 
         currentPage=1 
           showContent 
           showpage totalput,MaxPerPage,"l.asp" 
       end if 
    end if 
   rs.close 
   end if

set rs=nothing   
   conn.close 
   set conn=nothing 
   sub showContent 
       dim i 
    i=1 
%> 
      <%do while not rs.eof%> 
<tr>  
<td><%dim picc,vname,vnclass 
picc=rs("pic") 
vname=rs("name") 
vnclass=rs("nclass")%><% 
sql="update Special set pic='"&picc&"' where name='"&vname&"'  and nclass='"&vnclass&"'  " 
conn.execute sql 
%></td> 
</tr> 
<% i=i+1 
if i>=MaxPerPage then exit do 
rs.movenext 
loop 
%> 
</table> 
      <table width="100%" border="0" cellspacing="0" cellpadding="0" align="center"> 
        <tr>  
          <td height="21" bgcolor="#F7F7F7" align="center"> 
<% 
end sub  
function showpage(totalnumber,maxperpage,filename) 
  dim n 
  if totalnumber mod maxperpage=0 then 
     n= totalnumber maxperpage 
  else 
     n= totalnumber maxperpage+1 
  end if 
  if CurrentPage<2 then 
    response.write "" 
  else 
    response.write "<a href="&filename&"?page=1>首页</a> " 
    response.write "<a href="&filename&"?page="&CurrentPage-1&">上一页</a> " 
  end if 
  if n-currentpage<1 then 
    response.write "" 
  else 
    response.write "<a href="&filename&"?page="&(CurrentPage+1)&">" 
    response.write "下一页</a> <a href="&filename&"?page="&n&">尾页</a>" 
  end if 
   response.write " 页次：</font><b><font color=red>"&CurrentPage&"</font>/"&n&"</b>页</font> " 
    response.write " 共<b>"&totalnumber-1&"</b>个软件 <b>"&maxperpage&"</b>个软件/页" 
end function 
%> 
    </td> 
  </tr> 
</table> 
</body> 
</html>

赞 (0)

相关推荐

  • C#使用SqlBulkCopy批量复制数据到数据表

    本文实例讲述了C#使用SqlBulkCopy批量复制数据到数据表的方法.分享给大家供大家参考.具体实现方法如下: 使用 SqlBulkCopy 类只能向 SQL Server 表写入数据.但是,数据源不限于 SQL Server:可以使用任何数据源,只要数据可加载到 DataTable 实例或可使用 IDataReader 实例读取数据 1.使用Datatable作为数据源的方式: 下面的代码使用到了ColumnMappings,因为目标表和数据源Datatable的结构不一致,需要这么一个映射

  • 批量复制数据

    现有表Special和表view数据结构相同的两个表: 复制代码 代码如下: Special Specialid       NClass        name           pic 1                   黎明          火舞艳阳 2                   张学友      地久天长 3                   陈冠希      同名专辑 4                   郭富城      听风的歌 view Specialid 

  • php批量添加数据与批量更新数据的实现方法

    本文实例讲述了php批量添加数据与批量更新数据的实现方法.分享给大家供大家参考.具体分析如下: php如果要批量保存数据我们只要使用sql的insert into语句就可能实现数据批量保存了,如果是更新数据使用update set就可以完成更新了,操作方法都非常的简单,下面整理两个例子. 批量数据录入 设计方法:同时提交多条表单记录,为每一条记录设置相同的文本域名称,然后在表单处理页中,通过for循环来读取提取表单提交的数据,最后以数据的形式将数据逐条添加到数据库中. 其中,应用一个count(

  • Java实现mybatis批量插入数据到Oracle

    Java实现mybatis批量插入数据到Oracle

    最近项目中遇到一个问题:导入数据到后台并将数据插入到数据库中,导入的数据量有上万条数据,考虑采用批量插入数据的方式:  结合网上资料,写了个小demo,文章末尾附上demo下载地址 1.新建项目:项目目录结构如下图所示,添加相应的jar包 2.新建数据库表:ACCOUNT_INFO CREATE TABLE ACCOUNT_INFO ( "ID" NUMBER(12) NOT NULL , "USERNAME" VARCHAR2(64 BYTE) NULL , &q

  • sql下三种批量插入数据的方法

    sql下三种批量插入数据的方法

    本文将介绍三种批量插入数据的方法.第一种方法是使用循环语句逐个将数据项插入到数据库中:第二种方法使用的是SqlBulkCopy,使您可以用其他源的数据有效批量加载 SQL Server 表:第三种使用的方法是sql server中的表值参数方法,表值参数是 SQL Server 2008 中的新参数类型.表值参数是使用用户定义的表类型来声明的.使用表值参数,可以不必创建临时表或许多参数,即可向 Transact-SQL 语句或例程(如存储过程或函数)发送多行数据. 代码示例: 此例子为控制台输出

  • C#实现SQL批量插入数据到表的方法

    本文实例讲述了C#实现SQL批量插入数据到表的方法.分享给大家供大家参考,具体如下: #region 帮助实例:SQL 批量插入数据 多种方法 /// <summary> /// SqlBulkCopy往数据库中批量插入数据 /// </summary> /// <param name="sourceDataTable">数据源表</param> /// <param name="targetTableName"

  • Django框架利用ajax实现批量导入数据功能

    本文实例为大家分享了网页中利用ajax实现批量导入数据功能的实现方法,供大家参考,具体内容如下 url.py代码: 复制代码 代码如下: url(r'^workimport/$', 'keywork.views.import_keywork', name='import_keywork') view.py代码: from keywork.models import DevData from django.http import JsonResponse #django ajax部分 def im

  • php实现refresh刷新页面批量导入数据的方法

    本文实例讲述了php实现refresh刷新页面批量导入数据的方法.分享给大家供大家参考.具体分析如下: 这个功能是参考dedecms生成html页面的原理,只是dedecms使用的是js跳转而我使用的是refresh进行跳转,效果是一样的,下面我们一起来看一个php实现批量导入数据的方法. 因为我有1000W数据一次导入数据库肯定是不可行了,所以我就导致了每一次导入50条或更多数据,然后下次再刷新一次这样就可以解决这个问题了,代码如下: 复制代码 代码如下: <?php set_time_lim

  • C# Oracle批量插入数据进度条的实现代码

    前言 由于项目需求,需要将Excel中的数据进过一定转换导入仅Oracle数据库中.考虑到当Excel数据量较大时,循环Insert语句效率太低,故采用批量插入的方法.在插入操作运行时,会造成系统短暂的"卡死"现象.为了让用户知道插入的状态,需要制作一个进度条来显示插入的进度. 批量插入 项目中运用的是System.Data.OracleClient.首先将Excel数据通过转换函数转换为DataTable,其中的字段和数据库中相应表格的字段完全对应. public int Impor

  • SQL Server 批量插入数据的完美解决方案

    SQL Server 批量插入数据的完美解决方案

    一.Sql Server插入方案介绍 关于 SqlServer 批量插入的方式,有三种比较常用的插入方式,Insert.BatchInsert.SqlBulkCopy,下面我们对比以下三种方案的速度 1.普通的Insert插入方法 public static void Insert(IEnumerable<Person> persons) { using (var con = new SqlConnection("Server=.;Database=DemoDataBase;User

随机推荐