vb6記錄集sql查詢

Question

如何在vb6中使用append查詢與access db有密碼？以下是錯誤。 暗淡S作爲字符串 S = 「插入patientprofile從 'd：\ liverrecord.mdb'（crno）選擇patientprofile.crno & '的Jet OLEDB：數據庫密碼=肝'」

Answer 1

這不完全清楚自己想要什麼。然而，

您首先必須引用Microsoft DAO 3.6對象庫。然後您可以使用以下兩行打開數據庫。

Dim Engine As DAO.DBEngine: Set Engine = New DAO.DBEngine 
Dim DB As DAO.Database: Set DB = _ 
     Engine.Workspaces(0).OpenDatabase("D:\LiveRecord.mdb", false, false, _ 
     "MS Access;PWD=liver") 

您可以訪問SQL語句

Call DB.Execute("insert etc") 

我希望這有助於。

Guillaume Hanique