.ActiveConnection = cn '这句代码有误,应该是set .ActiveConnection = cn  '要知道,Connection 是对象

解决方案 »

  1.   

    Set DataGrid1.DataSource = com.Execute ()试试看把
      

  2.   

    各位所说的我都试过了,都不正确,始终是在
    Set DataGrid1.DataSource=com.Execute
    处报错,错误内容为:“行集合不能作为标签“还请各位高手能帮助在下解决这个小小的难题!!
      

  3.   

    cn.CursorLocation = adUseClient
    Set DataGrid1.DataSource = com.Execute
      

  4.   

    Dim adoRs as ADODB.Recordset
    set adors=com.execute
    set datagrid1.datasource=adors
      

  5.   

    把 cn.CursorLocation = adUseClient
    加在 cn.open 前试试