set datagrid1.datasource=rstpwd
adoddc1.refresh

解决方案 »

  1.   

    跟这个没关系,能刷新的都刷新了,用老版本的access全部正常,换成新版本的access就不显示了
      

  2.   

    有recordset对象了还用adodc做什么  啊/?set datagrid1.datasource=rstpwd
    adoddc1.refresh
      

  3.   

    都不是这个意思
    代码一:
    其中db1.mdb是access2000数据库
    Dim conn As New ADODB.Connection
    Dim rst As New ADODB.Recordset
    Private Sub Form_Load()
    conn.Provider = "Microsoft.jet.oledb.4.0"
    conn.Open App.Path & "\db1.mdb"
    With rst
        .ActiveConnection = conn
        .LockType = adLockBatchOptimistic
        .CursorType = adOpenKeyset
        .Open "select * from T_unit"
    End With
    Set DataGrid1.DataSource = rst
    DataGrid1.Refresh
    End Sub
    不能显示内容代码二:
    其中db2.mdb是用vb带的可视化数据库管理器做的7.0版本的access 数据库
    Dim conn As New ADODB.Connection
    Dim rst As New ADODB.Recordset
    Private Sub Form_Load()
    conn.Provider = "Microsoft.jet.oledb.3.51"
    conn.Open App.Path & "\db2.mdb"
    With rst
        .ActiveConnection = conn
        .LockType = adLockBatchOptimistic
        .CursorType = adOpenKeyset
        .Open "select * from T_unit"
    End With
    Set DataGrid1.DataSource = rst
    DataGrid1.Refresh
    End Sub能正常显示内容
    db1.mdb与db2.mdb在表结构完全一样,就是一个是新版的一个是旧版的。
    这是怎么回事