Kod:
Imports Microsoft.Office.Interop.Access.Dao
Kod:
Private Function ConvertLinkedTableToTable(ByVal tableName As String)
Dim dbEngine As New DBEngine() ' DAO DBEngine usage
Dim db As Database = dbEngine.OpenDatabase(Application.StartupPath & "\DataBase.mdb", False, False, ";PWD=12345") ' DB’yi aç
Const dbAttachSavePWD As Integer = 536870912
.....................