精华内容
下载资源
问答
  • VBrecordset的用法

    2012-10-04 10:41:05
    VBrecordset的用法,很全,很不错
  • VBRecordset的clone方法

    2019-09-21 04:08:20
    在用vb的时候,发现了个奇怪的问题,见下面代码,在生成Recordset的过程中,调用了recordset的clone方法,clone后沒有做任何操作,及時跟踪的过程中发现clone前的原recordset對象rectemp的recordcount是26,但是但...
    在用vb的时候,发现了个奇怪的问题,见下面代码,在生成Recordset的过程中,调用了recordset的clone方法,clone后沒有做任何操作,及時跟踪的过程中发现clone前的原recordset對象rectemp的recordcount是26,但是但调用Recordset的clone方法后,居然发现clone后新的複製本rectempcopy 比rectemp多了一倍的记录。郁闷,难道clone了还多出一倍?查询msdn,上面这么描述,

    Use the Clone method to create multiple, duplicate Recordset objects, particularly if you want to be able to maintain more than one current record in a given set of records. Using the Clone method is more efficient than creating and opening a new Recordset object with the same definition as the original.
    The current record of a newly created clone is set to the first record.
    我也不知道是怎么回事情?郁闷。查閲了一下msdn:
    Changes you make to one Recordset object are visible in all of its clones regardless of cursor type. However, once you execute Requery on the original Recordset, the clones will no longer be synchronized to the original.

    Closing the original Recordset does not close its copies; nor does closing a copy close the original or any of the other copies.

    You can only clone a Recordset object that supports bookmarks. Bookmark values are interchangeable; that is, a bookmark reference from one Recordset object refers to the same record in any of its clones.

    再次查閲了clone原理之後,引用了博客園天伤之梦的一段話描述clone获取浅表副本就是把这本书直接接给读者,获取深层副本就是把这本书留着(或者销毁),抄写一份给读者()。

    C#中dataset的copy方法是深copy,clone方法只是淺clone而已
    代码:
    Dim objPrv As Object 'SYSRRVB.clsPPrv
    Dim objRectemp As New ADODB.Recordset
    Dim objRectempcopy, Rectempcopy1 As New ADODB.Recordset
    Dim strtemp
    Set objPrv = CreateObject("'SYSRRVB.clsPPrv")
    If Me.chkDep.Value = 1 Then
        Set objRectemp = m_Buffer.Records(CLng(Mid(Trim$(Me.trvOrg.SelectedItem.Key), 2, 1)))
        Set objRectempcopy= objRectemp .Clone
        Set Rectempcopy1 = objRectemp
    ******
    end if
    clone的方法原理倒查閲了不少,但一直不知道爲什麽clone對象double原來的一倍?,而且增加的和原來的對象還不完全相同。?

    转载于:https://www.cnblogs.com/PeterWang/archive/2004/11/04/60596.html

    展开全文
  • VB ADODB中的RecordSet.Open打开记录的两个参数adOpenKeyset、adLockBatchOptimistic的详细说明: 这两个参数当时弄明白,过后又忘记了,做了笔记,但为了方便,还是在Blog中也做上这个笔记。   缺省值1 ...

    首先需要引用:

    ado

    VB ADODB中的RecordSet.Open打开记录的两个参数adOpenKeyset、adLockBatchOptimistic的详细说明:

    这两个参数当时弄明白,过后又忘记了,做了笔记,但为了方便,还是在Blog中也做上这个笔记。

     

    缺省值1        adLockReadOnly        RecordSet对象以只读方式启动,无法运行增、删、改等操作

          2        adLockPrssimistic     当数据源正在更新时,系统会锁定其他用户的动作,以保数据一致性。

          3        adLockOptimistic      当数据源正在更新时,系统不会锁定其他用户的动作,其他用户可以对数据进行增、删、改操作。

          4        adLockBatchOptimistic 当数据源正在更新时,其他用户必须将CursorLocation改为adUdeClientBatch才能对数据进行增、删、改的操作。

    默认值0       adOpenForwardOnly      使用仅向前游标。除了在记录中只能向前滚动外,与静态游标相同。当只需要在 Recordset 中进行一个传递时,用它可提高性能。

          1       adOpenKeyset           使用键集游标。尽管从您的 Recordset 不能访问其他用户删除的记录,但除无法查看其他用户添加的记录外,它和动态游标相似。其他用户所做的数据更改依然可见。

          2       adOpenDynamic          使用动态游标。其他用户所做的添加、更改或删除均可见,而且允许 Recordset 中的所有移动类型(如果提供者不支持书签,则书签除外)。 

          3       adOpenStatic           使用静态游标。一组记录的静态副本,可用于查找数据或生成报告。其他用户所做的添加、更改或删除不可见。

         -1       adOpenUnspecified      不指定游标类型

    -----------------------------------------------------------------------------------------------------

    Private conn As New ADODB.Connection
    Dim rc As New ADODB.Recordset
    Dim Query As New System.Text.StringBuilder

    'データ登録
    'rc.Open("select * from tablename", conn, 1,3) 等同于一下参数
    rc.Open("select * from tablename", conn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic)
    With rc
      .AddNew()
      .Fields("f1").Value = "a"
      .Fields("f2").Value = "b"
      .Fields("f3").Value = "c"
      .Update()
    End With
    rc.Close()

    'データ検索
    Dim select_rc As New ADODB.Recordset

    'Rs.Open sqlstr, Conn, 3, 2 
    select_rc.Open("select * from tablename", conn)


    'データ数量の判断
    If Not Rec.EOF Then
    'データない
        With select_rc
          'TODO...
        End With
    Else
      'データある

    Set FrmIndex.DataGrid1.DataSource = Rs '绑定frmindex.datagrid1控件
      'Rs.Close 关键所在,
               '执行完过程不能直接关了数据库否则不会有数据显示在Datagrid1中的
      'Set Rs = Nothing
    End If

    'データ更新
    Dim sex
            Dim score
            sex = Val(sextext.Text)
            score = Val(scoretext.Text)
            rs(0).Value = xuehaotext.Text
            rs(1).Value = nametext.Text
            rs(2).Value = sex
            rs(3).Value = score
            rs.Update()


    'データ削除
    rs.Delete()


    展开全文
  • VB6 ADODB.RecordSet

    2021-04-16 18:42:25
    为了更精确地跟踪数据,要用RecordSet组件创建包括数据的游标,游标就是储存在内存中的数据:  rs = Server.CreateObject("ADODB.RecordSet")  rs.Open(sqlStr,conn,1,A)  注:A=1表示读取数据;A=3表示新增、...

           为了更精确地跟踪数据,要用RecordSet组件创建包括数据的游标,游标就是储存在内存中的数据:

      rs = Server.CreateObject("ADODB.RecordSet")

      rs.Open(sqlStr,conn,1,A)

      注:A=1表示读取数据;A=3表示新增、改动或删除数据。

      在RecordSet组件中,经常使用的属性和方法有:

      rs.Fields.Count:RecordSet对象字段数。

      rs(i).Name:第i个字段的名称,i为0至rs.Fields.Count-1

      rs(i):第i个字段的数据,i为0至rs.Fields.Count-1

      rs("字段名"):指定字段的数据。

      rs.Record.Count:数据记录总数。

      rs.EOF:是否最后一条记录。

      rs.MoveFirst:指向第一条记录。

      rs.MoveLast:指向最后一条记录。

      rs.MovePrev:指向上一条记录。

      rs.MoveNext:指向下一条记录。

      rs.GetRows:将数据放入数组中。

      rs.Properties.Count:ADO的ResultSet或Connection的属性个数。

      rs.Properties(item).Name:ADO的ResultSet或Connection的名称。

      rs.Properties:ADO的ResultSet或Connection的值。

      rs.close():关闭连接。

    转载于:https://www.cnblogs.com/gcczhongduan/p/3989192.html

    展开全文
  • VB recordset

    2011-03-09 13:44:38
    VB recordset的属性,方法以及参数
  • 先对vb数据库开发经典实例解析这本书进行了一定的学习,实例1至实例5敲完了,低下头仔细想了想,印象最深的两个东东就是ADO Recordset 和 ADO Connection,好像哪都少不了,虽然记得他们但是却不知道他们具体是干...

    提高班开学十几天了,这个暑假我们主要任务是进行英语的学习和数据库的学习。先对vb数据库开发经典实例解析这本书进行了一定的学习,实例1至实例5敲完了,低下头仔细想了想,印象最深的两个东东就是ADO Recordset 和 ADO Connection,好像哪都少不了,虽然记得他们但是却不知道他们具体是干什么的,翻开书又看了看才知道,奥这是两个对象啊,再打开百度搜了搜他们的具体属性和方法,用思维导图总结了一下,这次有些开朗啊,不过还没达到豁然开朗的地步 呵呵 。下面就是我大体的一个思维导图,

    详图

    展开全文
  • VB6.0和VB.NET对比

    千次阅读 热门讨论 2018-09-23 09:41:25
    不能简单认为VB .net是VB的新版本。首先它们一个是完全面向对象的语言,而另一个不是完全面向对象的,其次VB .NET是构建于.Net framework之上的。当然,它们同属Basic系列语言,又同为微软所开发,语法上有一定的...
  • Dim num As IntegerDim sql As StringDim cn As ADODB.ConnectionDim rs As ADODB.RecordsetDim com As ADODB.CommandSet cn = New ADODB.Connectioncn.CursorLocation = adUseClientnum = Val(Text1.Text)sql = "up
  • vbrecordset的用法

    千次阅读 2011-10-14 09:52:48
    Set Rs =Server.CreateObject("ADODB.Recordset") Rs.Open Source, ActiveConnection, CursorType, LockType, Options 参数 Source 选择性参数: 此 Varian
  • VB6 RecordSet与XML转换

    千次阅读 2013-08-09 12:50:19
    Public Function SaveRSToXML(ByVal ConnectionString As String, ByVal strSQL As String) As String Dim oCn As New ADODB.Connection Dim oRs As New ADODB.Recordset Dim oStream As New ADODB.Stre
  • vb中用ado对象Recordset来绑定到DataGrid的常见问题分析 2014年03月14日 ⁄ 综合 ⁄ 共 2412字 ⁄ 字号 小 中 大 ⁄ 评论关闭 - 先看正常代码: Dim con As New ADODB.Connection '定义...
  • VB6--RECORDSET游标类型

    2014-12-16 14:30:06
    rs.Open sql,conn,1,3和rs.Open sql,...0 仅向前游标,只能向前浏览记录,不支持分页、Recordset、BookMark  1 键集游标,其他用户对记录说做的修改将反映到记录集中,但其他用户增加或删除记录不会反映到记录集中
  • vb中执行查询后,一般要判断是否为空,只要执行的查询执行了select,都可以用rs.eof 或者 rs.recordcount来判断, 但是,如果执行的sql中加了逻辑判断,导致没有执行任何select语句,则用rs.eof 或者rs.crcordcount...
  • vb用xml传输recordset

    2015-07-18 15:03:01
    ‘发送端 。。。。。。。。。。。。。。。。。。。。。。。 ... Set xrs = New ADODB.Recordset  xrs.Open XMLDoc 。。。。。。。。。。。。。。。。。。。。。。。。。。
  • VB ADODB中的RecordSet.Open的参数

    千次阅读 2013-09-14 11:34:30
    这三天做机房收费有个问题一直没解决、就是数据库插入数据、插入不进去、但是就不报错、最后师傅给我看了看、终于发现了问题 把adLockOptimistic写成了adLockBatchOptimistic、因为没语法错误所以没报错、随后我查...
  • 需要在object设置中参数...然后定义object对象型recordset参数 Dim objRst As Object Dim conn As Object Set conn = New ADODB.Connection Set objRst = New ADODB.Recordset 在objRst.open前设置客户端指针: ...
  • 实现recordset分组汇总

    2012-03-27 04:37:43
    实现recordset分组汇总,性能不是很高,但能用,欢迎交流 QQ:675010888
  • VB ADODB中的RecordSet.Open打开记录的两个参数adOpenKeyset、adLockBatchOptimistic的详细说明: 这两个参数当时弄明白,过后又忘记了,做了笔记,但为了方便,还是在Blog中也做上这个笔记 缺省值1 ...
  • 读取Excel文件并返还数据集RecordSet 该方法适用于.xls,.xlsx类型的文件 读取Excel文件的Function: 1 '取得数据集 2 Function getRecordSetForExcels(sFilePath As String, _ 3 sTable...
  • 是建立一个数据集 前面应该先定义此数据集 dim rs as adodb.recordset 然后就可以用 set rs=server.CreateObject(“adodb.recordset”) 来建立一个数据集的实例,当然此时数据集中是没有数据的 rs.open …… 来打开...
  • vb数据库编程(一)--记录集Recordset

    千次阅读 2011-04-05 15:53:00
    转自SOHU博客VB菜鸟堂
  • Private Sub Form_Load() Dim RS As ADODB.Recordset Set RS = GetExcelRs(App.Path & "\book1.xls") MsgBox RS.RecordCount MsgBox RS(0) RS(0)
  • '**************************************' 过程名: Recordset2Excel' 描 述:使用ADO Recordset对象把记录导入到Excel文件中'' 输 入:ADO Recordset''****************************************Public Sub ...
  • VB DataGridView控件介绍

    2011-04-15 09:38:21
    VB DataGridView控件介绍VB DataGridView控件介绍VB DataGridView控件介绍VB DataGridView控件介绍
  • RecordSet.GetRows

    千次阅读 2017-08-22 16:40:58
    GetRows 方法传回一个二维的数组变量,每一行对应Recordset中的一笔记录,且每一列对应到记录中的字段。 此方法的语法如下:   varArray = rs.GetRows([Rows], [Start], [Fields])  Rows 是要读取记录的数量;...
  • asp的adodb.recordset如何获取支持返回多个数据库数据结果的数据集合,如ms sqlserver支持一次返回多个数据结合,adodb.recordset如何获取多个结果集合。  平常用adodb.recordset时一般只返回一个结果结合,直接...
  • **用vb写“用户管理”窗体,“注册用户”运行正常,注册了名叫lucy的用户,然后点击“删除现有用户”删除lucy, ** ![图片说明](https://img-ask.csdn.net/upload/201904/13/1555153806_713138.jpg) ** ...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 6,143
精华内容 2,457
关键字:

recordsetvb