我在VB目錄下找到這樣型別的檔案Microsoft Access Database (.MDB),打開方式默認為Microsoft Access,但是打開又提示要升級,點擊是又會轉換失敗,出來的表都是一些亂的代碼。不是我資料庫里的表。這該怎么辦。是不是要下一個什么?
uj5u.com熱心網友回復:
在VB打開Access資料庫需要連接,不知道你是什么情況,在2005系統中也可以操作Access資料庫的。uj5u.com熱心網友回復:
Private Sub Command1_Click()
'On Error Resume Next
Dim cn As New ADODB.Connection
Dim fsofile
If cn.State <> 0 Then cn.Close
Set cn = Nothing
Set fsofile = CreateObject("scripting.filesystemobject")
CommonDialog1.Filter = "mdb檔案(*.mdb)|*.mdb"
CommonDialog1.CancelError = True
On Error GoTo myerr
CommonDialog1.ShowSave
fsofile.copyfile App.Path & "\FDCPGGL.mdb", CommonDialog1.FileName
Dim connectionstring As String
connectionstring = "provider=Microsoft.Jet.oledb.4.0;" & _
"data source=" & App.Path & "\FDCPGGL.mdb"
cn.Open connectionstring
Exit Sub
myerr:
End Sub
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/75310.html
上一篇:VB 源陣列超出長度
