تعديل كود حذف واعاده الترقيم التلقائي للجدوال المرتبطه

[النجاشي]

السلام عليكم ورحمه الله وبركاته احبتي الكرام 

عندي الكود يعمل بصوره جيده اذا كان الجدول غير مرتبط

المطلوب تعديل الكود للجدوال المرتبطه 

تحياتي اليكم

DoCmd.SetWarnings False
DoCmd.RunSQL "DROP INDEX PrimaryKey ON Hrakatsanf;"
DoCmd.RunSQL "ALTER TABLE Hrakatsanf DROP COLUMN ID;"
DoCmd.RunSQL "ALTER TABLE Hrakatsanf ADD column  ID AUTOINCREMENT, " & _
"CONSTRAINT [PrimaryKey] PRIMARY KEY ([Tarkam]);"
DoCmd.SetWarnings True

[النجاشي]

للرفع