为什么我用ado控件绑定textBox控件的时候会出现实时错误'713'类没有注册的问题呀?
我用adodc控件绑定其他表格控件,如datagrid就是正常的呀!
代码如下:
Adodc1.RecordSource = "select * from unit"
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1Set Text1.DataSource = Adodc1  ‘?出问题!

解决方案 »

  1.   

    还要设置
    Text1.DataField = "xx"
      

  2.   

    如果下面的代码再出错,重新VB吧:)Option ExplicitPrivate Sub Command1_Click()
        Dim Connstr As String
        Dim strSql As String
        
        Connstr = "provider=microsoft.jet.oledb.4.0;data source=" + App.Path + "\db1.mdb;persist security info=false"
        Adodc1.ConnectionString = Connstr
        Adodc1.CommandType = adCmdText
        Dim sq As String
        strSql = "select * from table"
        Adodc1.RecordSource = strSql
        Adodc1.Refresh
        Set DataGrid1.DataSource = Nothing
        Set DataGrid1.DataSource = Adodc1
        Set Text1.DataSource = Adodc1
        Text1.DataField = "Name"
    End Sub
      

  3.   

    呵呵,我现在在另外一台机器上,同样的代码OK哈!我估计是vb的问题,我用的是vb+sp5,ado控件是sp4的版本,今天回去再试试!不行就重装哈!
    谢谢!