是否可以修改Access加密後端的結構？

Question

我有一個拆分數據庫。嘗試使用前端，我可以使用VBA將字段添加到鏈接後端的表中，直到使用密碼對後端進行加密。

是否有可能仍然使用前端VBA將字段添加到後端的表中，而無需手動解密後端？

感謝您的回覆。

Answer 1

應該是。試試這些筆記：

Sub AlterDB() 
    Dim db As DAO.Database 
    Dim sDB As String 
    Dim tdf As TableDef 
    Dim fld As Field 

    ''Encrypted 
    sDB = "Z:\Docs\Test.enc" 

    ''http://msdn.microsoft.com/en-us/library/office/ff193474.aspx 
    ''Password is case sensitive 
    Set db = OpenDatabase(sDB, False, False, "MS Access;PWD=pW") 

    ''Option with tabledef 
    ''The table is currently closed 
    Set tdf = db.TableDefs("table1") 
    Set fld = tdf.CreateField("NewField", dbText, 20) 
    tdf.Fields.Append fld 

    ''Option with DDL 
    ssql = "ALTER TABLE table1 ADD COLUMN AnotherNew Int" 
    db.Execute ssql, dbFailOnError 

End Sub 

Sub ListFields() 
    sDB = "Z:\Docs\Test.enc" 
    Set db = OpenDatabase(sDB, False, False, "MS Access;PWD=FB") 

    Set tdf = db.TableDefs("table1") 
    For Each f In tdf.Fields 
     Debug.Print f.Name 
    Next 

End Sub