Set .DataSource = VCP_CONNECTION_HQ.Execute(strQuery)时出错
错误号:“-2147417848”
错误信息:“对象 'DataSource' 的方法 'IVSFlexGrid' 失败”
请问这是什么意思呀?如何能避免呢?

解决方案 »

  1.   

    什么控件阿?还有VCP_CONNECTION_HQ是什么东东?
      

  2.   

    set rs=VCP_CONNECTION_HQ.Execute(strQuery)
    Set .DataSource = rs
      

  3.   

    Microsoft FlexGrid (MSFlexGrid) 控件可以显示网格数据,也可以对其进行操作。它提供了高度灵活的网格排序、合并和格式设置功能,网格中可以包含字符串和图片。如果将它绑定到一个 Data 控件上,那么 MSFlexGrid 显示的将是只读的数据。
    注意 两个旧的控件,Data 控件和 RemoteData 控件,可以用做数据源,然而,您不能在运行时将另一个控件或对象的 DataSource 属性设置为这两个控件之一。例如,下列代码将会失败:Set Text1.DataSource = Data1    ' 将会失败!您不能在运行时将 DataSource 设置为
                                  ' 一个内部 Data 控件。要将 Data 控件或 RemoteData 控件作为一个数据源使用,您只能在设计时设置绑定控件的 DataSource 属性。
      

  4.   

    大侠,我用的是vsflexgrid
    VCP_CONNECTION_HQ是一个连接
    定义如下
    dim vcp_conenction_hq as new adodb.connection
      

  5.   

    VCP_CONNECTION_HQ.Execute(strQuery)的结果是表集吗?
      

  6.   

    '试试改用类似我下面的方法:    Dim iRe As ADODB.Recordset
        Dim iConc As String
        
        iConc = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False" & _
            ";Data Source=c:\ACCESS.mdb"
            
        Set iRe = New ADODB.Recordset
        iRe.Open "select * from aa.", iConc, adOpenKeyset, adLockOptimistic
        
        Set VSFlexGrid1.DataSource = iRe