是不是ado效率太低

dtzfl 2003-10-31 02:28:58
我用类似下面的程序测试ado
for i=0 to rs.recordcount-1

strSql = "select * from xxx where personno='" & rs!personNo & "'"
Set rs1 = New ADODB.Recordset
rs1.CursorLocation = adUseClient
rs1.Open strsql, strcon1, adOpenStatic, adLockOptimistic, adCmdText

Set rs2 = New ADODB.Recordset
rs2.CursorLocation = adUseClient
rs2.Open strsql, strcon1, adOpenStatic, adLockOptimistic, adCmdText

If rs2.RecordCount < 1 Then rs2.AddNew
rs2("PersonNo") = rs1("PersonNo")
rs2("PersonID") = rs1("PersonID")
rs2("Photo") = rs1("Photo") '是一张图片
rs2.Update

next

结果是1000条记录左右速度还可以,此后越来越慢,查看资源使用情况CPU使用接近100,内存使用越来越多.
是不是ado效率太低,没释放内存,不知如何提高效率?
...全文
90 13 打赏 收藏 转发到动态 举报
写回复
用AI写文章
13 条回复
切换为时间正序
请发表友善的回复…
发表回复
zjcxc 2003-10-31
  • 打赏
  • 举报
回复
'而且你的代码这样改,应该效率会高一些,当然,我只是根据你给出的代码片断做出判断,可以这样修改:

strSql = "select * from xxx"
Set rs1 = New ADODB.Recordset
rs1.CursorLocation = adUseClient
rs1.Open strsql, strcon1, adOpenStatic, adLockOptimistic, adCmdText

Set rs2 = New ADODB.Recordset
rs2.CursorLocation = adUseClient
rs2.Open strsql, strcon1, adOpenStatic, adLockOptimistic, adCmdText

for i=0 to rs.recordcount-1
rs1.filter="personno='" & rs!personNo & "'"
rs2.filter="personno='" & rs!personNo & "'"

If rs2.RecordCount < 1 Then rs2.AddNew
rs2("PersonNo") = rs1("PersonNo")
rs2("PersonID") = rs1("PersonID")
rs2("Photo") = rs1("Photo") '是一张图片
rs2.Update

next
zjcxc 2003-10-31
  • 打赏
  • 举报
回复
ACCESS与SQL均支持与其他数据库之间的数据交换.

dtzfl 2003-10-31
  • 打赏
  • 举报
回复
各路英雄,擂台比武啦
dtzfl 2003-10-31
  • 打赏
  • 举报
回复
楼上的,不同数据库之间不能这样写SQL的,何况是在VB环境下
zjcxc 2003-10-31
  • 打赏
  • 举报
回复
照你的处理方法,不但是慢,而且是特慢.根本不关ADO的事.

直接用更新语句不是更好吗?下面是SQL的写法,ACCESS与这个有所区别.你最好写出表结构及目的,然后考虑直接用一条语句更新,速度肯定很快.

update 表1 set PersonNo=b.PersonNo
,PersonID=b.PersonID
,Photo=b.Photo
from 表1 a inner join 表2 b on a.personno=b.personNo
dtzfl 2003-10-31
  • 打赏
  • 举报
回复
目的:不同的数据库之间复制表数据
victorycyz 2003-10-31
  • 打赏
  • 举报
回复
先说说你这段代码的目的吧。别人都看不明白的。
dtzfl 2003-10-31
  • 打赏
  • 举报
回复
放在循环外的也试过拉,结果没什么变化,我该怎么办呢?帮忙
dtzfl 2003-10-31
  • 打赏
  • 举报
回复
救命阿
rs1.close
rs2.close
set rs1=nothing
set rs2=nothing
这样也不行!!!
yoki 2003-10-31
  • 打赏
  • 举报
回复
rs1与rs2查询出的结果一莫一样吧?不知道你的目的是什么??有这样写的必要吗
况且你的2个查询又都写在循环里面,不慢才怪,特别是还有图片!!
即使rs1,rs2都要用,但是放在循环里每次去定义有必要吗?放在循环外一次定义即可
victorycyz 2003-10-31
  • 打赏
  • 举报
回复
不是ADO的问题,是你的问题。
lxqlogo0 2003-10-31
  • 打赏
  • 举报
回复
你申请的对象rs1,rs2没有释放掉,这样写试试:
Set rs1 = New ADODB.Recordset
Set rs2 = New ADODB.Recordset
for i=0 to rs.recordcount-1

strSql = "select * from xxx where personno='" & rs!personNo & "'"

rs1.CursorLocation = adUseClient
if rs1.state=1 then rs1.close
rs1.Open strsql, strcon1, adOpenStatic, adLockOptimistic, adCmdText


rs2.CursorLocation = adUseClient
if rs2.state=1 then rs2.close
rs2.Open strsql, strcon1, adOpenStatic, adLockOptimistic, adCmdText

If rs2.RecordCount < 1 Then rs2.AddNew
rs2("PersonNo") = rs1("PersonNo")
rs2("PersonID") = rs1("PersonID")
rs2("Photo") = rs1("Photo") '是一张图片
rs2.Update

next
rs1.close
rs2.close
set rs1=nothing
set rs2=nothing
shuanyu 2003-10-31
  • 打赏
  • 举报
回复
先释放内存重新再来
1 引言 随着Internet的普及,越来越多的编辑部建立了自己的Web网站,编辑部通过网站不仅可以发布征稿启事和动态信息,展示自己的期刊杂志,扩大期刊的影响,而且还极大地方便了用户(投稿用户、审稿专家和读者等)和编辑部之间的沟通和联系,用户投稿和专家审稿可以一改传统的邮寄方式,而是通过在线投稿和在线审稿的方式来完成,既方便了用户,又提高了编辑部的效率。此外,编辑部还可以通过网站与合作伙伴建立联系,以及通过开展电子商务等来增加编辑部的效益。 图1 《中西医结合学报》稿件处理流程图 传统的编辑部网站绝大多数是静态HTML页面,主要用来展示编辑部的一些信息,而并没有提供功能性的服务,如前面提到的线投稿、在线审稿、在线订阅论文检索等功能服务。而且基于静态HTML页面的网站有一个致命的缺陷,即网站信息更新效率太低。下面本文将以《中西医结合学报》网站(网址:http://www.jcimjournal.com/)开发为背景,详细论述了基于ASP.NET技术和ADO.NET技术的通用编辑部网站信息动态管理系统的设计和开发。 2 编辑部网站的需求分析 实践表明,软件开发前的需求分析是软件成败的关键,如果没有进行详细的需求分析,没有充分理解系统的各类用户的实际需求,那么最终的软件产品充其量只能说是软件开发者的作品而已,没有任何意义可言。因此,在开发《中西医结合学报》网站之初,我们对网站需求进行了详细的分析。 编辑部网站管理信息系统所实现的最终目标,就是要使编辑部的信息管理实现全面的规范化、科学化、自动化,高效化和流程化,对于一个编辑部来说,它的人手是非常有限的,编辑部网站管理信息系统要使有限的编辑人员实现高效的管理,使各类编辑部信息(如:投稿信息、审稿信息、费用信息和新闻信息等)得到有序的管理。因此,一个编辑部网站应该具有如下的功能:
蓝焰设计站图文管理系统 论文 ASP.NET的网站新闻管理系统设计与实现 【摘要】利用ASP.NET和ADO.NET技术开发的网站新闻管理系统,实现了网站新闻的动态管理,使得对信息的管理更加及时、高效,提高了工作效率。同时对系统的开发原理、系统的功能特点和设计方案进行了介绍。 【关键词】ASP.NET ADO.NET 新闻 管理 数据库 随着Internet的普及,越来越多的企业建立了自己的WWW网站,企业通过网站可以展示产品,发布最新动态,与用户进行交流和沟通,与合作伙伴建立联系,以及开展电子商务等。其中新闻管理系统是构成企业网站的一个重要组成部分,它担负着双层作用,一方面可以用来动态发布有关新产品或新开发项目,另一方面又可以及时向顾客公告企业经营业绩、技术与研发进展、特别推荐或优惠的工程项目、产品和服务,从而吸引顾客,扩大顾客群。 传统的网站新闻管理方式有两种,一是静态HTML页面,更新信息时需要重新制作页面然后上传页面并修改相应链接,这种方式因为效率太低已不多用。二是基于ASP和脚本语言,将动态网页和数据库结合,通过应用程序来处理新闻,这是目前较为流行的做法。但是由于ASP本身的局限性使得系统有一些不可克服的缺陷,而采取了ASP.NET技术的系统性能上有了很大的改善,其主要表现在以下几方面: 1.由于ASP页面每次打开都必须经过先编译后解释的过程,所以页面在反复打开时速度没有任何提升,而ASP.NET页面只需要一次编译后不需要重新编译,直到该页面被修改或Web应用程序重新启动。这使得在多次访问时速度有了极大的提升。 2.由于ASP没有提供任何输出数据为内容的元件,所以在使用ASP撰写数据库页面时只能借助ADO的RecordSet对象逐笔读取记录,而ASP.NET通过ADO.NET提供的DataGrid等数据库元件可以直接和数据库联系。 3.ASP.NET支持应用程序的实时更新。管理员不必关掉网络服务器或者甚至不用停止应用程序的运行就可以更新应用文件。应用程序文件永远不会被加锁,因此甚至在程序运行时文件就可以被覆盖。当文件更新后,系统会温和地转换到新的版本。 4.ASP.NET采取"code-behind"方式编写代码使得代码更易于编写,结构更清晰,降低了系统的开发与维护的复杂度和费用。 1系统的开发原理 1.1 基于ASP.NET技术的系统结构模型 ASP.NET结构是一个三层系统:UI层、业务逻辑层和数据层,如图1所示。 图1 ASP.NET的系统结构模型 UI层负责与用户交互,接收用户的输入并将服务器端传来的数据呈现给客户。 业务逻辑层负责接收浏览器传来的请求并将请求传给数据层,同时将请求处理结果发给浏览器。它由Web表单、XML Web服务和组件服务组成。其中Web表单是ASP.NET应用程序的核心所在,它是向客户呈现数据和信息的基础,也是响应和处理客户与显示的Web表单交互生成的信息和数据的基础。 数据层是通过ADO.NET操纵数据为事务逻辑层提供数据服务,如存储数据操作结果、返回数据检索结果等。 1.2 ADO.NET访问数据库的原理 与数据库相连,ADO.NET提供了如下3种方式:通过ODBC相连;通过OLEDB相连;直接与SQL Server相连。3种方式由于应用层次的差异,使得效率由低到高,独立性由高到低。对于相连数据库的数据处理,也有2种方式,即一种是通过DataSet来隔离异构的数据源,另一种是以流方式从数据源读取(DataReader方式)。 传统的应用程序是通过先建立到数据库的连接,在程序的整个运行过程中维护连接的方式来设计的。ASP.NET采取了断开连接方式的数据结构。当浏览器向Web服务器请求网页时,服务器处理这个请求,并将所请求的网页发送给浏览器,然后连接就被断开,直到浏览器发出下一个请求。 ADO.NET的另一个创新是引入了数据集(Dataset)。一个数据集是内存中提供数据关系图的高速缓冲区。数据集对数据源一无所知,它们可以由程序或通过从数据仓库中调入数据而被生成、填充。不论数据从何处获取,数据集都是通过使用同样的程序模板而被操作的,并且它使用相同的潜在的数据缓冲区。 2 系统的功能设计 2.1 系统的功能结构 该新闻管理系统可以在Windows 2000 Server操作系统平台上运行,Web服务器为IIS,数据库服务器为Microsoft SQL Server2000,开发工具采用的Microsoft Visual Studio .NET和DreamWeaver。图2给出系统的功能结构图。其工作流程为:用户登录通过权限判断,普通用户只能浏览、阅读和查询新闻,注册用户除了可以完成普通用户的操作外,还可以进入新闻管理模块进行新闻录入、修改和删除的操作。注册用户除系统管理员外只能对自己录入的新闻进行删改操作。 2.2 系统的功能特点 (1)操作简单、界面友好:完全控件式的页面布局,使得新闻的录入工作更简便;许多选项包括新闻类别、来源部门等只需要点击鼠标就可以完成;另外,跟踪出现的提示信息也让用户随时清楚自己的操作情况。 (2)即时可见:对新闻的处理(包括录入、修改、删除)将立即在主页的对应栏目显示出来,达到"即时发布、即时见效"的功能。 图2 系统功能结构图 (3)功能完善:包括常见网站的新闻管理的各个方面:新闻录入、浏览、删除、修改、检索等各个方面,完整地实现了网站对即时新闻的管理要求。 (4)方便移植:针对不同的企业,只需要稍作修改就可以开发出适合本企业特点的网站新闻管理系统! 3 系统的详细设计 系统的主要功能是通过几个功能模块来实现的。具体的设计过程如下: ⑴ 系统登录:该模块负责将用户分为普通用户和注册用户来实现用户权限的管理。 ⑵ 新闻浏览:该模块负责分页列出网站所有新闻的信息,包括标题、类型、来源部门字段及发布日期,每条新闻的标题被做成一个超链接,点击它们就能跳转页面进行新闻阅读。 ⑶ 新闻阅读:在其他页面中点击标题链接即进入新闻阅读页面,此时,每条新闻的详细信息将被取出,包括内容、标题、关键字等,并按照相对固定的格式放置在页面的不同区域,所有新闻使用大致相同的页面布局,只是各字段对应的内容不同而已,另外,页面其它位置,可以动态放置其他元件,如网站标志logo、页面广告banner等链接图片,这样可以很容易地实现图文并茂的阅读效果。 ⑷ 新闻查询:该模块提供了新闻查询功能,输入待查找的内容及选定分类信息可以快速地找到符合条件的新闻,并输出查询结果。 ⑸ 新闻管理:该模块负责分页罗列登录的注册用户曾发布过且未删除的新闻信息,用户可以对该条新闻进行删除、修改。非新闻发布者除系统管理员外不具有对该条新闻的处理权限,所以不同用户进入此页面将显示不同的内容。 ⑹ 新闻录入和修改:注册用户录入一条新闻所需要的内容,包含标题、关键字、类型、来源部门、发布日期等,同时从登录模块得到用户名,这些信息将被写入数据库中保存。该模块还负责编辑状态下的更新,这时,它将根据取得的Title字段值对页面控件初始化。 下面以系统登录页面的编写为例给出主要事件和函数,说明该系统的开发过程。 //IsRegUserOk函数:判断用户是否已经注册和密码是否正确 public bool IsRegUserOk() { string name=TextBoxName.Text.Trim(); string pwd=TextBoxPassword.Text.Trim(); //建立/打开数据库连接 SqlConnection conn=new SqlConnection(); conn.ConnectionString="server=(local);uid=sa;pwd=;database=jxdb"; conn.Open(); //建立sql字符串 string sql="select * from reg where name='"+name+"'"; SqlDataReader dr; SqlCommand cmd=new SqlCommand(sql,conn); dr=cmd.ExecuteReader(); //保留用户注册与否信息 bool isRegUserExist=dr.Read(); //关闭DataReader dr.Close(); //取得用户名的密码 string sqlBoth="select * from reg where name='"+name+"'"; sqlBoth+="and pwd='"+pwd+"'"; SqlCommand cmdBoth=new SqlCommand(sqlBoth,conn); SqlDataReader drBoth; drBoth=cmdBoth.ExecuteReader(); //保留用户名+密码同时存在信息 bool isBothExist=drBoth.Read(); //关闭DataReader drBoth.Close(); conn.Close(); //判断用户是否注册 if(!isRegUserExist) { Response.Write("<script>alert('此用户尚未注册!')"); return false; } //判断用户名与密码是否一致 else if(!isBothExist) { Response.Write("<script>alert('用户名和密码不一致,不能进入!')"); return false; } else return true; } 最后给出系统后端数据存储方案: 利用Microsoft SQL Server 2000建立数据库及其存储过程。这里给出两个必需的数据表,一是数据表News包含的字段有:编号、姓名、标题、关键字、内容、类型、来源部门和日期。字段说明如下: 二是数据表Reg包含的字段有:编号、姓名、密码、所属部门、电子邮箱和电话。字段说明如下: 参考文献 [1]天极网新技术研究室.《ASP.NET完全入门》.重庆出版社,2001 [2]Scott Worley著.《ASP.NET技术内幕》.王文龙 刘湘宁译.人民邮电出版社,2002 [3]Sanjeev Rohilla, Senthil Nathan, Surbhi Malhotra著.《ADO.NET专业项目实例开发》.陈君 王宝良译.中国水利水电出版社,2003 [4]丁晟春 王曰芬.网站新闻发布管理系统的设计与应用.现代图书情报技术.2002,5 [5] 手机铃声下载 网站优化网站推广 免费论文下载 职称论文下载

1,216

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧