谁说的?View1是个视图
    Dim aa As ADODB.Connection
    Dim ss As ADODB.Recordset
    Set aa = New ADODB.Connection
    Set ss = New ADODB.Recordset
    aa.CursorLocation = adUseClient
    aa.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=" + "数据库" + ";Data Source=" + "主机名"
    
    aa.Open
    ss.ActiveConnection = aa
    Dim sqlTmp As String
    sqlTmp = "select * from VIEW1"
    ss.Open sqlTmp
    MsgBox ss.RecordCount

解决方案 »

  1.   

    老大你试了吗?
    用view作查询 记录集能出来
    但是recordcount=-1
      

  2.   

    to :lxcc(虫莲)
    你的问题!!
    我试了,可以。
    你试试在rs.recordcount之前 rs.movelast 一下
      

  3.   

    sorry 
    我试了,不行,
    不过我用
    do while not rs.eof
         'use rs
    loop
    可以得到所有的结果集但是用recordcount就是等于-1
    包括各种各样的move我都试了
      

  4.   

    Recordset 对象的游标类型会影响是否能够确定记录的数目。对仅向前游标,RecordCount 属性将返回 -1,对静态或键集游标返回实际计数,对动态游标取决于数据源返回 -1 或实际计数。
      

  5.   

    用对静态方法adoRst.CursorType = adOpenStatic
      

  6.   

    如果我这里运行不通过,我就不会贴出来
    aa.CursorLocation = adUseClient
    一定要有
    别的不多说了,有点后悔回贴了,555,还埋怨我
      

  7.   

    sorry! i will go home to test ,then give you wanted
    thank you!