实时错误'7004':
行集合不能作为标签Finds = "SELECT  uStudBaseInfo.学号,uStudBaseInfo.姓名,uSelectClass.学期  FROM uStudBaseInfo,uSelectClass,uScoreInfo where uStudBaseInfo.学号=uSelectClass.学号 and  uStudBaseInfo.学号=uScoreInfo.学号 and uScoreInfo.成绩 is null and uScoreInfo.缺考原因 is null and uSelectClass.课程代号=" & txtClassID.Text
RscouRse.Close
RscouRse.Open Finds
Set DataGrid2.DataSource = RscouRse如何解决啊,急急急~~~~~~

解决方案 »

  1.   

    RscouRse.Close
    RscouRse.CursorLocation = adUseClient
    RscouRse.Open Finds
    Set DataGrid2.DataSource = RscouRse
      

  2.   

    工程--->引用--->Microsoft ActiveX Data Object 2.x(版本号)    Dim CN   As New ADODB.Connection                '定义数据库的连接
        Dim Rs   As New ADODB.Recordset    CN.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\NWIND.MDB;Persist Security Info=False"
        CN.Open    Rs.CursorLocation = adUseClient
        Rs.Open "select * from employees", CN, adOpenDynamic, adLockBatchOptimistic    Set DataGrid1.DataSource = Rs
      

  3.   

    你用的游标有问题,试试键集游标(keyset)或静态游标(readonly)加保守锁(第二个拼法忘了)
    应该就可以了,因为DataGrid控件不支持动态游标(Dynamic)