APP.PATH路径的问题

Question

我有1个mdb数据库，有2个表，压力容器，常压容器。通过COMBO1的选择来控制ADODC1与表的关联。
下面是我的代码， 一切正常.现在我将数据库的地址改为APP.PATH路径,结果在 Set rst = db.OpenRecordset("压力容器"dbOpenTable)显示类型不匹配
,请帮忙看看问题在那Private Sub Form_Load() 
  Combo1.AddItem "a" 
  Combo1.AddItem "ab" 
  
    Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=C:\lbj.mdb" 
    Adodc1.RecordSource = "压力容器" 
    Set DataGrid1.DataSource = Adodc1  
    Adodc1.Refresh End Sub 
Private Sub Combo1_click() 
    Select Case Combo1.ListIndex 
        Case 0 
            Adodc1.RecordSource = "压力容器" 
        Case 1 
            Adodc1.RecordSource = "常压容器" 
    End Select 
  
  Adodc1.Refresh    
End Sub -----------------------------------------------------
下面是修改后的语句
Dim db As Database
Dim rst As RecordsetPrivate Sub Form_Load()Combo1.AddItem "a"
 Combo1.AddItem "ab"
  
 Set db = Workspaces(0).OpenDatabase(App.Path & "\LBJ.mdb", False)
 Set rst = db.OpenRecordset("压力容器"dbOpenTable)    Set DataGrid1.DataSource = Adodc1  
    Adodc1.RefreshEnd Sub

Answer 1

看不懂你这个db.OpenRecordset("压力容器"dbOpenTable)

Answer 2

第一个用的ado,第二个用的是dao.
完全不一样的东东,混用.哎!
如果是针对access的应用,可以去看visdata,一个vb自带的例子.

Answer 3

我没有MSDN啊,没法看例子.哪位大侠能帮我解决啊

Answer 4

为什么要改？原来的也可以用app.pathAdodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=" & app.path & "\lbj.mdb"