vb 与acess2000

Question

一个例子：
strSource = "Data Source=" + App.Path + "\english.mdb;"
strprovider = "provider=Microsoft.Jet.OLEDB.4.0;"'（注意这里的驱动版本）
Set dbconn = New ADODB.Connection
dbconn.CursorLocation = adUseClient
dbconn.Open strprovider + strSource + "User ID=;Password=;"
Set rcdset = New ADODB.Recordset
rcdset.Open "select * from table", dbconn, adOpenDynamic, adLockOptimistic