تعطيل خانة البحث

[رابح1999]

السلام عليكم

اخواني تما تعطيل خانة البحث عن الموظفين 

واريد البحث بالمهنة والاسم والعمر

وجازاكم الله خيرا

الموظفين.rar

[رابح1999]

سلام عليكم

اخواني تما تعطيل خانة البحث عن الموظفين 

واريد البحث بالمهنة والاسم والعمر

وجازاكم الله خيرا

[سلمان الشهراني]

جرب المرفق بعد التعديل

 

الموظفين.rar

تم تعديل مارس 14, 2020 بواسطه سلمان الشهراني

[رابح1999]

اخي سلمان لدي سؤال

[سلمان الشهراني]

تفضل

[رابح1999]

اخي اريد زر استعلام الحاقي من الجدول الاول

الى الجدول الثاني مع الحدف من الجدول الاول

وعند الضغط على الزر يتم تفرغ الحقول وتظهر رسالة تنبه

وبارك الله فيك

 

[سلمان الشهراني]

لايوجد الا جدول واحد فقط اسمه 
table

[رابح1999]

اخي اضف جدول اخر

[رابح1999]

اخي اريد زر استعلام الحاقي من الجدول الاول

الى الجدول الثاني مع الحدف من الجدول الاول

وعند الضغط على الزر يتم تفرغ الحقول وتظهر رسالة تنبه

وبارك الله فيك

[kha9009lid]

بعد اذن اخي الفاضل @سلمان الشهراني

ايقاف رسائل التحذير

DoCmd.SetWarnings False

تنفيذ استعلام الحاق

DoCmd.RunSQL "INSERT INTO table2 ( id, الاسم, [تاريخ التولد], العمر, المهنة, الملاحظات ) " & vbCrLf & _
"SELECT table.id, table.الاسم, table.[تاريخ التولد], table.العمر, table.المهنة, table.الملاحظات " & vbCrLf & _
"FROM [table];"

تنفيذ استعلام حذف

DoCmd.RunSQL "DELETE table.* " & vbCrLf & _
"FROM [table];"

تحديث النموذج الفرعي بعد الحذف

Me.subform12.Requery

رسالة تنفيذ المهمة

MsgBox "تم تنفيذ نقل الملفات", vbInformation, "رسالة ادارية"

اعادة تفعيل رسائل التحذير

DoCmd.SetWarnings True

الملف مرفي المرفقات

 

الموظفين.accdb