هل هناك كود يحول من accdb الى accde

لا تحتاج الى كود خاص لتعمل ملف Accde فقط انتقل الى تبويب ادوات واضغط على زر انشاء Accde

Private Sub makeAccde_Click()
sourcedb = "D:\sterile_dep\pre_db\label.accdb"
targetdb = "D:\sterile_dep\label.accde"
Dim accessApplication As Access.Application
Set accessApplication = New Access.Application
With accessApplication
.SysCmd 603, sourcedb, targetdb
End With
 Set accessApplication = Nothing
 DoCmd.Close acForm, "makeAccde"
 DoCmd.Quit
End Sub