Dim rs As New ADODB.RecordsetDim cn As New ADODB.Connection
Dim strsql As String
strsql = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\library.mdb;Persist Security Info=False"
cn.Open strsqlrs.Open "select BorrowInfo.* from BorrowInfo where(BorrowInfo.BookNumber='001"')", cn, adOpenKeyset, adLockOptimistic, adCmdText通过这个,为什么就无需在窗体上添加ADO控件即可访问数据库
如果在同一个窗口还需要打开另一张表,是不是要先用rs.close关闭原来打开的表
rs的其他方法都有些什么?我这边msdn的盘坏了,没法装,还请各位不吝赐教

解决方案 »

  1.   

    ADO控件可以说是帮助你连上数据库的工具。你也可不用它,直接用代码连。
    recordset在一个连接中可以有多个,所以,不必关闭原来的recordset,可以新建一个。
    recordset的方法,你可以在代码编辑窗口中,键入"recordset.",在输入完“.”时,稍停一会,画面上会自动显示出可用的属性、方法。
      

  2.   

    但并没有显示出这些方法是干吗的
    我手头没有msdn可以查,所以请有资料的给我贴一点,谢谢了
    刚才跑到msdn网站,看了半天也没看出个所以然to 楼上的,recordset在一个连接中可以有多个,所以,不必关闭原来的recordset,可以新建一个。
    是不是说
    rs.Open "select BorrowInfo.* from BorrowInfo where(BorrowInfo.BookNumber='001"')", cn, adOpenKeyset, adLockOptimistic, adCmdText
    后我还能rs.open查询另一个表,而不用rs.close?
    不过我在程序里好像不行
    我就new了两个recordset rs1 rs2来分别操作同一个数据库中的两张表
      

  3.   

    你new了几个就可以打开几个,一个RS只能打一次(不关的情况下)
      

  4.   

    在打开表之前加上这句就可以打开多个记录集了
    Rs.CursorLocation = adUseClient
    建议不要打开过多的记录集,最好在操作完一个表后,马上关闭,避免逻辑错误!!