rs.open sql,conn 与conn.execute(sql)

本文详细介绍了在VB环境中使用conn.execute(sql)和rs.opensql,conn两种方法进行数据库操作的区别及应用场景。前者适用于简单的一次性数据库操作,后者适用于复杂的数据库交互,并提供了具体的代码示例。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

如果只需要一笔带过的碰碰数据库,用conn.execute(sql)   
如果要对数据库作比较庞杂的操作!则最好用rs.open sql,conn  

rs.open sql,conn:有记录集返回,此记录集可以前后移动,可用于执行SELECT语句。打开的记录可以进行分页显示,但这种方式打开的记录集不能排序conn.execute(sql):也可以返回记录集的,只不过只能是只读、只向前记录集,一般用于执行update、insert或者delete语句。 通过执行sql,返回后得到记录集,比较简单地得到经过筛选过的记录集,但是通过这种方式得到的记录集,不能进行分页显示。rs.open sql,conn:如果sql是 delete,update,insert则会返回一个关闭的记录集,在使用过程中不要来个rs.close在文件最后再写rs.close中间可以来多 个记录集rs1.open sql1,conn, 最后一块关闭记录集:rs.close rs1.closeconn.execute(sql):如果sql是update,insert,delete则应该使用conn.execute(sql)也可以不要括号conn.execute sql  如果sql是select语句则应该使用set rs=conn.execute(sql)括号一定要,不能省略:这是因为vb的特性,带返回值的调用必须加括号,不带返回值的调用可以不要括号。

 

   rs.open sql,conn:set rs=server.createobject("adodb.recordset")
                             sql="select * from admin where username='xiaozhu'"
           rs.open sql,conn,1,1
           '可以自己设定一些参数,即锁定和游标的移动方式
           '最后要关闭记录集和连接
           rs.close
           set rs=nothing
           conn.close
           set conn=nothing

   conn.execute(sql):sql="select * from admin where username='xiaozhu'"
           set rs=conn.execute(sql)
           '执行完以后自动关闭记录集
           '最后只需要关闭连接就可以了
           conn.close
           set conn=nothing

1. set rs=conn.execute("如果是select语句") 得到的rs.recordcount=-1 
       rs.open sql,conn("sql为select语句") 得到的rs.recordcount为正常的记录数
   2. rs.open是打开数据库 conn.execute 是执行SQL指令 
       set rs=conn.execute(insert,update,delete)返回一个关闭了的记录集 
   set rs=conn.execute(select)返回一个没有关闭的记录集

3.conn.execute sql适合于不需返回recordset对象时使用,比如下面的代码: 
  sql="delete from enews where id="&cstr(id) 
  conn.execute sql

如果需要返回recordset对象,则使用如下代码: 
  sql="select from enews where id="&cstr(id) 
  set rs = conn.execute(sql)

如果去掉execute(sql)这儿的括号(即为set rs = conn.execute sql),就会提示“语句未结束”这样的错误提示,我翻看了一下语法格式,发现有二种格式,详解如下:

格式一:Connection对象名.Execute(SQL指令).  
  格式二:Connection对象名.Execute(数据表名)。 

附一:

set   rs   =   conn.execute(sql)  

是带有返回值的,一般sql为查询的时候使用。如   
  set   rs   =   conn.execute("select   *   from   ...")   
  当然执行insert   into   和delete也是可以的   
  set   rs   =   conn.execute("insert   into   table   (f1,f2..")   
  但是要创建Recordset对象,占用服务器资源。在insert   into,   delete的时候我     们一般不需要返回记录集。所以我是这样认为的:  

在使用查询的时候,用   set   rs   =   conn.execute("select   *   from   table")   
  在插入和删除时候,用   conn.execute("delete   from   table   where   ...")   
    
  第二种方式代码简洁,不需要显式地创建Recordset对象(但实际上好象是隐式创建的)   
  第二种方法还有一些简洁的写法:如,最某表的记录数  

dim   count   
  count   =   conn.execute(select   count(*)   from   table)(0)   
  上面的语句等于   
  count   =   conn.execute(select   count(*)   from   table).fields(0).value  

综上:区别在于set   rs   =   conn.execute是显示创建recordset对象,而conn.execute是隐式的。   
  能用conn.execute的时候就用conn.execute,好处有   
  一、代码简洁   
  二、效率应该有所提高

附二:

形成记录集的方法有三种 1.Conn.execute 2.rs.open sql,conn  3.Command.execute  方法用法大大不通      
    通常  Set   rs=CONN.execute(SQL)    或直接   rs=CONN.execute(SQL)和

Set   rs=Server.CreateObject("ADODB.Recordset")  

rs.open   SQL,CONN,0,1  或rs.open   SQL,CONN   
    这种情况通常open比上一个性能要好那么一丁点   
    使用CONN.execute 可以不用关闭直接执行下一个set   rs=conn.execute(SQL)  但性能速度会大打折扣!! 大约要慢   2~5倍!!

(这是我在msSQL循环1000次亲自测试过的,不信你马上自己测试),所以执行下一个   rs=conn.execute之前!!一定要关闭掉!是个好习惯!   
    使用单一对象的rs    rs.open在open下一个记录集之前,必需要求显示关闭,否则出错,速度在SQL,CONN,0,1的情况下可前者基本一样  

所以我喜欢使用直设置一个   CreateObject("adodb.recordser")(在不需要多个记录集交错操作的情况下,多个也不碍是!)   
    然后从头用到尾!!!   
    开门关门开门关门~~~~~咵踏咵踏~~~~   
    最后一个   set   rs=nothing   化上句号,爽!   
    
  更主要是   open提供非常灵活的操作数据库元数据的非常多的属性!!   
  打开百宝箱,金光灿灿什么都看见!   
  有很多情况下是非得用open来做的!   
  而conn.execute   想黑布下换胶卷~~~偷偷摸摸~~非常单一!!!   
    
  比如:   
    
  rs1.open   SQL1,conn,0,1   
  rs.open   SQL,conn,1,3   
  if   rs(0)<0   then   rs(0)=0   
  rs(1)=aaa   
  rs(2)=bbb   
  rs.update   '   更新记录集写到数据库   
    
  rs.addnew   '加一条新记录   
  rs(0)=1   
  rs(1)=ddd   
  rs(2)=kkk   
  rs.update   
  id=rs(3)     rs(s)   '取的字段是自动编号   立即获得新记录的自动编号id   //这是非常常用的   
    
  rs1.addnew   对rs1添加关连使用id   rs的新记录   
  rs1("id")=id     
  rs1(1)=...   
  ..   
  rs1.update   
    
  rs1.close:set   rs1=nothing   
  rs.close:set   rs=nothing   
    
    
  上面的操作如果采用CONN.execute   则要用到四个   CONN.execute   
    
  CONN.execute("update   ..")   
  CONN.execute("insert   into   表1:")   
  rs=CONN.execute("select   新的自动   id")       
  CONN.execute("insert   into   表二")   
  那一种方法逻辑条理更好~~一目了然   
    
  ======================   
    
  还有一个有趣的使用Recordset   open记录的方法!!   
  我想起来是有点费解   
    
  Set   rs=server.CreateObject("Adodb.recordset")   
  Set   rs=server.CreateObject("Adodb.recordset")   
    
  rs.open   SQL1,CONN   
  rs.open   SQL2,CONN   
    
  '嘿嘿~~~这是同时设置同名的两个对象来打开两个记录集,而且是可用的!   
  '只要取的列名合乎这两个记录集中元数据   
  '则正常操作!!   
  扩展开来   
    
  Set   rs=server.CreateObject("Adodb.recordset")   
  Set   rs=server.CreateObject("Adodb.recordset")   
  Set   rs=server.CreateObject("Adodb.recordset")   
  Set   rs=server.CreateObject("Adodb.recordset")   
    
  rs.open   SQL1,CONN   
  rs.open   SQL2,CONN   
  rs.open   SQL3,CONN   
  rs.open   SQL4,CONN   
    
  这样大于二个同名的   rs我还没试过!!   
    
  感觉有点相当与   SQL联合查询再打开记录集~~~   
  以前我这样用过!!应该不是眼花!!   
  ===============   
    
  什么时候用什么?   
  那就凭个人经验积累的感觉了:   
    如果只需要一笔带过的碰碰数据库,用execute   
  如果要对数据库作比较庞杂的操作!则最好用   rs.open  

附三:rs.close()与conn.close(),set rs=nothing与set conn=nothing

conn 数据库对象 可以简单的把它理解为一个mdb文件或者一个SQL数据库(注意这种理解方法是错误的,严格的说它应该是一个与那个数据库建立了连接的“对象”而已。)

rs RecordSet对象(记录集) 当只是读取数据时,可以把它理解为从一个数据库中检索出来的一系列行 当用来更新数据时,

可以把它理解为连接着数据库中指定的行的遥控器 现在应该明白什么时候要关闭conn了吧?

打开了数据库,如果下面不用再进行数据库操作,就应该立刻关闭。

不同的页面,本来就要重新连接,与前一个页面的操作是没有关系的,你其他页面有没有关闭都要先打开数据库。

对于节约资源,减轻服务器负担方面,数据库打开的越迟越好,关闭的越早越好。

 

 

转载于:https://www.cnblogs.com/yybk/archive/2012/03/25/2416607.html

<think>我们正在讨论的是使用ADO(ActiveXData Objects)执行存储过程时遇到的问题。在VBScript或ASP中,我们通常使用ADODB.Connection和ADODB.Recordset对象来操作数据库。问题描述:执行存储过程时,使用`rst.open sql.conn,1,3`或 `set rst=conn.Execute(sql)`返回的记录集(Recordset)是已经关闭的。首先,我们需要理解这两种执行方式:1.`setrst =conn.Execute(sql)`这是执行SQL语句(可以是查询或存储过程)并返回一个记录集。返回的记录集是只读、仅向前的(默认情况下),并且是只读的。但是,如果存储过程返回多个记录集,或者没有返回记录集,那么这种方式可能不会返回预期的结果。2.`rst.Open sql, conn,1,3`这里`rst`是一个显式创建的Recordset对象。参数说明:- sql:命令文本(可以是存储过程名或SQL语句)- conn:连接对象-1:游标类型,adOpenKeyset(1)表示键集游标-3:锁类型,adLockOptimistic(3)表示乐观锁存储过程可能不返回记录集,而是执行一个操作(如更新、删除)或返回输出参数。或者,存储过程可能返回多个记录集。为什么返回的记录集是关闭的?可能的原因:-存储过程没有返回任何记录集。-存储过程返回了多个记录集,而默认只获取第一个记录集,但第一个记录集可能是空的(或者没有记录集),那么记录集对象可能是关闭的。-存储过程执行过程中出现了错误,导致没有记录集返回。解决方案:1.检查存储过程是否确实返回了记录集。确保在存储过程中有SELECT语句返回结果。2.使用`Command`对象来执行存储过程,这样可以更灵活地处理参数和多个结果集。使用`Command`对象执行存储过程的示例:步骤:a.创建Command对象,设置其ActiveConnection为当前连接。b.设置CommandText为存储过程名,并指定CommandType为adCmdStoredProc(4)。c.如果有参数,则创建参数并添加到Command对象。d.使用Command对象的Execute方法执行,然后获取记录集。示例代码(VBScript): ```vbDim conn, cmd, rsSetconn =Server.CreateObject("ADODB.Connection") conn.Open "your_connection_string"Setcmd =Server.CreateObject("ADODB.Command") Setcmd.ActiveConnection= conncmd.CommandText= "your_stored_procedure_name" cmd.CommandType=4' adCmdStoredProc'如果有参数,例如输入参数@Param1DimparamSet param= cmd.CreateParameter("@Param1",adVarChar,adParamInput,50, "value")cmd.Parameters.Append paramSetrs =cmd.ExecuteIfNot rsIs NothingThenIfNot rs.EOFThen'有记录,处理记录集Else'记录集为空End IfElse'没有返回记录集EndIfrs.CloseSetrs =NothingSet cmd= Nothingconn.CloseSet conn= Nothing```注意:如果存储过程返回多个记录集,可以使用`rs.NextRecordset`来获取下一个记录集。另一个可能的原因是连接字符串或存储过程执行错误,导致记录集无法打开。因此,我们应该检查错误。在`conn.Execute`或`cmd.Execute`后,可以检查错误集合: ```vbIf conn.Errors.Count>0 ThenFor Eacherr Inconn.ErrorsResponse.Write"Error: "& err.DescriptionNextEndIf```总结:当使用存储过程时,推荐使用`Command`对象,因为它更灵活,可以处理参数和多个结果集,并且更容易调试。现在,针对你的问题,为什么返回的记录集是关闭的?可能是因为存储过程没有返回记录集,或者返回了空记录集(并且被自动关闭了),或者执行过程中有错误。请检查存储过程是否确实返回了记录集,以及是否有错误发生。相关问题:1.如何用VBScript处理存储过程的输出参数?2.如何捕获并处理ADO执行过程中的错误?3.在ASP中,如何遍历多个记录集?4.使用Command对象和直接使用Connection对象的Execute方法有什么区别?</think>### 为什么执行存储过程返回已关闭的记录集? 在 ADO (ActiveX Data Objects) 中,使用 `rst.Open sql, conn, 1, 3` 或 `Set rst = conn.Execute(sql)` 执行存储过程时返回已关闭的记录集,通常由以下原因导致: --- #### 原因分析 1. **存储过程未返回记录集** - 存储过程只执行了 `INSERT/UPDATE/DELETE` 操作 - 使用了 `SET NOCOUNT ON` 禁止返回行计数 - 最终未执行 `SELECT` 语句 2. **ADO 的默认行为** - 当存储过程无有效记录集时,ADO 会自动关闭返回的 `Recordset` 对象 - 检查 `Recordset.State` 属性会返回 `adStateClosed` (值为 0) 3. **参数或调用方式错误** - 未正确传递必需参数 - 存储过程内部逻辑未走到返回结果的分支 --- #### 解决方案:使用 `Command` 对象正确调用存储过程 以下是完整的 VBScript/ASP 解决方案: ```vb <% Dim conn, cmd, rst Set conn = Server.CreateObject("ADODB.Connection") conn.Open "Provider=SQLOLEDB;Data Source=.;Initial Catalog=YourDB;User ID=sa;Password=pass;" ' 创建 Command 对象 Set cmd = Server.CreateObject("ADODB.Command") With cmd .ActiveConnection = conn .CommandText = "YourStoredProc" ' 存储过程名 .CommandType = adCmdStoredProc ' 4 表示存储过程 ' 添加参数(示例) .Parameters.Append .CreateParameter("@InputParam", adVarChar, adParamInput, 50, "Value") .Parameters.Append .CreateParameter("@OutputParam", adInteger, adParamOutput) ' 执行存储过程 Set rst = .Execute End With ' 检查记录集状态 If rst.State = adStateOpen Then ' 1 表示打开状态 ' 正常处理记录集 While Not rst.EOF Response.Write rst("FieldName") & "<br>" rst.MoveNext Wend rst.Close Else Response.Write "存储过程未返回记录集" End If ' 获取输出参数 Response.Write "输出参数值: " & cmd.Parameters("@OutputParam").Value ' 清理资源 Set rst = Nothing Set cmd = Nothing conn.Close Set conn = Nothing %> ``` --- #### 关键点解释 1. **`CommandType = adCmdStoredProc`** 明确告知 ADO 执行的是存储过程而非普通 SQL。 2. **参数处理** - `adParamInput`:输入参数 - `adParamOutput`:输出参数 - 通过 `Parameters` 集合访问返回值 3. **状态检查** 使用 `rst.State = adStateOpen` (值 1) 验证记录集是否有效打开。 4. **错误处理** 添加 `On Error Resume Next` 和错误检查: ```vb On Error Resume Next Set rst = cmd.Execute If Err.Number <> 0 Then Response.Write "错误: " & Err.Description End If ``` --- #### 其他注意事项 - **存储过程示例** 确保存储过程包含结果集返回: ```sql CREATE PROCEDURE YourStoredProc @InputParam VARCHAR(50), @OutputParam INT OUTPUT AS BEGIN SET NOCOUNT OFF; -- 允许返回行计数 SELECT * FROM YourTable WHERE Field = @InputParam; SET @OutputParam = 100; END ``` - **连接字符串** 根据实际环境调整提供程序(如 `SQLNCLI11` 用于较新 SQL Server)。 --- ###
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值