السلام عليكم ورحمة الله وبركاتة
وجدت هذا الكود في احدى مشاركات الاستاذ @jjafferr
وهو خاص بتحويل البرنامج من صيغة accdb إلى accde
unction ConvertToaccDE()
sourcedb = "C:\Users\Trevor G\Documents\sample back.accdb"
targetdb = "C:\Users\Trevor G\Documents\sample back.accde"
Dim accessApplication As Access.Application
Set accessApplication = New Access.Application
With accessApplication
.SysCmd 603, sourcedb, targetdb
End With
'Set accessApplication = Nothing
End Function
حاولت تطبيق الكود ولكن لم اجد اي نتيجه
المطلوب :
تحويل البرنامج Fass عند فتحه وتحويل برنامج mass يوجدبنفس المجلد في نفس الوقت
وبعد اتمام عملية التحويل يتم حذف الملفات التي بصيغة accdb ثم اغلاق البرنامج Fass وفتح البرنامج mass
علما ان المجلد سيكون على سطح المكتب
prog.rar