اجرای 3 اکشن کوئری به ترتیب پشت سرهم

[MahanMahanPorNejad]

دوستان من 3 اکشن کوئری دارم که اولی App و دوتای بعدی Del هستن و به ترتیب پشت سرهم باید اجرا بشن فعلا از طریق منوی دی بی اول کوئری APP اجرا میشه و بعد بوسیله یک ماکرو 2 کوئری Del .
به نظر شما راهی هست که از طریق ماکرو یا ماجول این 3 کوئری پشت سرهم به ترتیب زیر اجرا بشن :

شماره نوع اکشن کوئری اسم کوئری
1 a Append
2 b Delete
3 c Delete
از راهنمائیتان سپاسگزارم

[samaneh_h]

خب شما می‌تونی کد بنویسی مثلاًوقتی یه دکمه خاصی رو زدی پشتش این کد رو بنویس
"docmd.openquery "query1
"docmd.close acquery,"query1
"docmd.runquery "query2
"docmd.close acquery,"query2
"docmd.runquery "query3
"docmd.close acquery,"query3

[MahanMahanPorNejad]

با تشکر اگه ممکنه به این فایل ضمیمه نگاهی بیندازید.متشکرم

[MahanMahanPorNejad]

باسلام مجدد در ضمیمه قبلی بین تیبل 3 و2 اشتباها رابطه برقرار شده که با پوزش این رابطه در رلیشن شیپ باید حذف شود. متشکرم

[samaneh_h]

همه چیز درسته کدی که من نوشته بودم ایراد داشت خط اول و آخر رو هم گذاشتم برای اینکه مرتباً پیغام اخطار و پرس و جو برای حذف نشان داده نشه. کد پشت دکمه رو تغییر بده به:

DoCmd.SetWarnings False
"DoCmd.OpenQuery "qry-1
"DoCmd.Close acQuery, "qr-1
"DoCmd.OpenQuery "qry-2
"DoCmd.Close acQuery, "qry-2
"DoCmd.OpenQuery "qry-3
"DoCmd.Close acQuery, "qry-3
DoCmd.SetWarnings True