recordset 动态创建及同数据库断开连接使用是否可以?

解决方案 »

  1.   

    不清楚问题意思recordset 动态创建====》可以
      

  2.   

    连接数据库
    提取数据
    断开 连接
    操纵
    recordset
      

  3.   

    可以
    相当于离线记录集可以保存成xml文件
      

  4.   

    对,可以先把数据集以XML文件的方式写到内存中,用组件MSXML提供的方法和属性可以很方便的操作它。
      

  5.   

    可以
    相当于离线记录集可以保存成xml文件
    //
    倒,你以为这是ADO。NET啊
    NET才是保存XML,关是VB开发这要增加多少麻烦
      

  6.   

    示例如下Dim cn As New ADODB.Connection
    Dim rs As New ADODB.Recordset
    Private Sub Command1_Click()
        rs.CursorLocation = adUseClient
        rs.Open "Select * from students", cn, adOpenStatic, adLockBatchOptimistic
        MsgBox rs.RecordCount
        '保存为XML
        rs.Save "c:\bbb.xml", adPersistXML
        rs.Close
        '读取XML文件
        rs.Open "c:\bbb.xml", cn, adOpenStatic, adLockReadOnly, adCmdFile
        MsgBox rs.RecordCount
        rs.Close
    End SubPrivate Sub Form_Load()
        If cn.State = 1 Then
            cn.Close
        End If
        cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\db1.mdb"
    End Sub
      

  7.   

    我对列复职为什么不可以。结果集是个查询。ado对并发处理有哪些?
      

  8.   

    有什么限制?个人感觉vb的数据控件远没有pb,delphi做的好
      

  9.   

    recordset是连线记录集,断开相关数据库连接记录集无法使用
      

  10.   

    connstr=连接语句rs.activeconnection=connstr
    rs.open "select * from table"
    rs.activeconnection=nothing '关闭连接'使用rs
    ............
      

  11.   

    Dim cn As New ADODB.Connection
    Dim rs As New ADODB.Recordset
    Private Sub Command1_Click()
        rs.CursorLocation = adUseClient
        rs.Open "Select * from 表", cn, adOpenStatic, adLockBatchOptimistic
        
        Dim XmlObject as msxml.DOMDocument
        
        Set XmlObject =New msxml.DOMDocument    rs.Save XmlObject , adPersistXML   '保存为XML    Set Rs=Nothing    '读取XML
        Set rs=New Adodb.Recordset
        rs.open XmlObject End Sub特点是不保存到文件,把数据保存到XML对像
      

  12.   

    切断记录集:比如添加大量记录客户端游标CursorLocation=adUseClient
    记录集打开参数使用
    CursorType adOpenStatic
    LockType adLockBatchOptimisticstr ="SELECT * FROM 表1 where 1=2" '如果不需要修改数据,只需得到空的记录集
    rssave.Open str, conn, adOpenStatic, adLockBatchOptimistic
    打开记录集后,将ActiveConnection属性设为Nothing,断开与数据库的连接然后循环添加记录
    添加完成后rssave.ActiveConnection=strconn'先重新连接数据库
    rssave.UpdateBatch'把本地记录集缓存中的数据更新到数据库
      

  13.   

    不能象Delphi一样断开与数据库的连接,断开相关数据库在VB中则记录集无法使用。
      

  14.   

    个人感觉还是 viena(维也纳nn-实心木头人石欠RUKYO)的方法比较实在