tiger wanted قام بنشر يوليو 6, 2020 قام بنشر يوليو 6, 2020 بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته لو سمتحتم اريد كود حذف جميع الجداول المرتبطة فى اكسس 2010 ولكم الشكر والتقدير
kanory قام بنشر يوليو 6, 2020 قام بنشر يوليو 6, 2020 4 ساعات مضت, tiger wanted said: بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته لو سمتحتم اريد كود حذف جميع الجداول المرتبطة فى اكسس 2010 ولكم الشكر والتقدير هل جربت هذا الكود ؟؟؟؟؟؟ Dim FrontObj As AccessObject, FrontDB As Object Set FrontDB = Application.CurrentData For Each FrontObj In FrontDB.AllTables If Left(FrontObj.Name, 4) <> "MSys" Then DoCmd.DeleteObject acTable, FrontObj.Name End If Next FrontObj Set FrontDB = Nothing 3
tiger wanted قام بنشر يوليو 7, 2020 الكاتب قام بنشر يوليو 7, 2020 اشكرك يا اخى الكود رائع وجارى تطبيقه على عدد من الجداول المرتبطة وشكرا
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.