Private Sub Command1_Click()
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim str As String
str = "dsn=FZYCTEST;uid=XH;pwd=XH;"
cn.ConnectionString = str
cn.Open
rs.CursorLocation = adUseClient
rs.Open "select * from xh_test", cn, adOpenStatic, adLockReadOnly
Set DataGrid1.DataSource = rs
End SubPrivate Sub Form_Load()
Adodc1.Visible = False
End Sub我在ADODC的属性中的记录源的命令类型是ADCMDTEXT
命令文本是:select * from xh_test
怎么老是提示无法初始化数据绑定?
我快晕了,救救我

解决方案 »

  1.   

    rs.CursorLocation = adUseClient
    改为 cn.CursorLocation = adUseClient
      

  2.   

    看你给出的代码关ADODC什么事??
      

  3.   

    你实际上是使用了 Connection 和 RecordSet 对象,可以将 ADODC 控件删除。
      

  4.   

    若使用绑定控件虽然方便,但缺小灵活性。
    建议使用ADO对象。请多多指教!
      

  5.   

    应该是一启动就出错吧adodc1的使用语句有点微妙,属于控件本身设计问题
    到网上搜下adodc1看看代码有什么区别就可以了
      

  6.   

    代码在我机子上是可以运行的,看看你的DSN有没有设置好