حسين العربى

استاذي الفاضل محمد ايمن ممكن عمل نموذج متعدد السجلات بحيث اني ابعت باسورد لكل موظف بمعني انا عندي 90 موظف كل موظف ليه باسورد مختلف وبتجدد يوميا ممكن ابعت لهم رساله مره واحده وكل شخص يروحله الباسورد الخاص به انا جربتها علي برنامجك ولاكن يبعث باسورد واحد لكل الموظفين هل من حل اليك المرفق الي جربت عليه للتضح الفكرة send1.rar

استاذي الفاضل السيد جمال السيد ممكن عمل نموذج متعدد السجلات بحيث اني ابعت باسورد لكل موظف بمعني انا عندي 90 موظف كل موظف ليه باسورد مختلف وبتجدد يوميا ممكن ابعت لهم رساله مره واحده وكل شخص يروحله الباسورد الخاص به انا جربتها علي برنامجك ولاكن يبعث باسورد واحد لكل الموظفين هل من حل اليك المرفق الي جربت عليه للتضح الفكرة send1.rar

الف شكر استاذي ومعلمي الفاضل هذا هو المطلوب جزاك الله خيرا وجعله الله في ميزان حسناتك

استاذي ومعلمي الفاضل اليك المرفق ليتضح الامر PROGRMS_Super Market 1201202017.rar

استاذي الفاضل ومعلمي شكرا علي مرروك الطيب الظاهر ماوصلك ما اقصده بالظبط او يمكن انا الي فهمت شنو تقصد انا عاوذ ابحث من مربع نص واحد فقط في عدد اثنين نموذج فرعي يعني مثلا لما اضع رقم الفاتوره في مربع النص واضغط انتر يديني النتيجه في النموذجين مع العلم انا كل نموذج مرتبط بجدول غير الاخر

السلام عليكم ورحمة الله وبركاته اخواني اعضاي ومشرفي المنتدي الكرام عندي نموذج رئيسي اسمه forms_1 وعدد اثنين نموذج فرعي نموذج اسمه fry_111 ولاخر اسمه fry_112 اريد البحث برقم الفاتورة من خلال مربع نص واحد اسم مربع النص tt1 فما هو التعديل علي هذ الكود Dim vSearchString As String vSearchString = Me.tt1.Text Me.tt2.Value = vSearchString Me.fry_111.Requery او حل اخر ولكم جزيل الشكر

الف الف شكر استاذي ومعلمي الفاضل

Inx: Nz(DSum("[كمية]";" مستلم";"[رقم الصنف]='" & [رقم الصنف] & "'");0) otx: Nz(DSum("[الكمية]";"مبيعات";"[رقم صنف]='" & [رقم الصنف] & "'");0) الف شكر استاذي ومعلمي الفاضل jjafferr علي هذه المعلومه

استاذي ومعلمي الفاضل الف شكر علي مرورك الطيب الظاهر اني الاستعلام مار راح يظبط معي ممكن تعدل لي هذا الكود لاضعه في استعلام Inx: Nz(DSum("[كمية]";" مستلم";"[رقم الصنف]='" & [رقم الصنف] & "'");0) otx: Nz(DSum("[الكمية]";"مبيعات";"[رقم صنف]='" & [رقم الصنف] & "'");0) علي نفس المسميات لو تكرمت لاني كنت استخدمه من قبل في بداية تعليمي للاكسس في برنامج بس كانت مسميات الجداول بالعربي والحقول بالعربي فاحتاجته الحين فلما نقلته الي برنامجي لم يعمل لان المسميات بالانجليزي فممكن تعديل من حضرتك علي الكود اليك المرفق فيه الاستعلام الي طبقت عليه الكود test.rar وهذا البرنامج القديم الي كان فيه الاستعلام الي به الكود ده برنامج مبيعات.rar

السلام عليكم ورحمة الله وبركاته اخواني اعضاء ومشرفي المنتدي الكرام سوالي هو عمل استعلام توحيد لجدولين جدول مبيعات وجدول مشتريات جدول المبيعات اسمه conform وحقوله (item_no) (Qote_item) جدول المشتريات اسمه tabol_item وحقوله (item_no) (Qote_item) الهدف من ذلك للعلم معرفة الرصيد المتبقي من كل صنف علشان اطرح المباع من المشتري كان عندي استعلام في برنامج قديم ممتاز بس كانت الحقول بالعربي فلما نقلته في استلام في برنامجي اختلاف الامر وما ظبط معي فقلت اعمل استعلام توحيد Inx: Nz(DSum("[كمية]";" مستلم";"[رقم الصنف]='" & [رقم الصنف] & "'");0) otx: Nz(DSum("[الكمية]";"مبيعات";"[رقم صنف]='" & [رقم الصنف] & "'");0)

استاذي ومعلمي الفاضل Shivan Rekany لك مني كل الشكر والتقدير ولاستاذي الفاضل ابو زاهر جزاكم الله خير وجعله الله في ميزان حسناتكم

الف شكراستاذي الفاضل ابو زاهر فعلا فكره ممتازه لحل الموضوع

السلام عليكم ورحمة الله وبركاته اخواني اعضاء ومشرفي المنتدي الكرام سؤالي يتضح من الصوره فعند الغاء خاصية اضافة من خصائص النموذج وجعلها ( لا ) من النموذج الفرعي يظهر كلمة خطأ في مربع نص المجموع وعند تفعيل الخاصية الي ( نعم ) لاتظهر فما حل ذلك لاني لا اريد تفعيل الخاصية اضافة وجعلها لا قبل اضافة اصناف في النموذج الفرعي يظهر النص #خطأ بعد اضافة اصناف في النموذج لا تظهر # خطأ اليكم مرفق TEST.rar

الف الف شكر استاذي ومعلمي الفاضل جزاك الله خيرا واسكنك فسيح جناته

الف شكر لكم اساتذتي ومعلميني الافاضل علي مروركم الطيب وانه لشرف لي مشاركتكم موضوعي ارفق لكم مثال لما اريد في المرفق نموذج واحد بعد فتح النموذج اضغط علي السهم للاسفل سوف ينتقل التركيز الي مربع بحث بالباركود / وعند الضغط للاعلي ينتقل التركيز الي مربع نص بحث برقم الصنف اريد عند الضغط علي السهم لليمين ينتقل التركيز الي مربع نص تحديث باركود / وعند الضغط علي سهم لليسار ينتقل التركيز الي مربع نص رقم الصنف واسف علي الاطاله وجزاكم الله خيرا test.rar

السلام عليكم ورحمة الله وبركاته اخواني اعضاء ومشرفي المنتدي الكرام عندي طلب انشاء الله يكون سهل اوريد تنفيذ عدة اوامر عن طريق موديل بمعني نقل المؤشر الي مربع نص معين من خلال الضغط علي مفتاح معين بس اريد تنفيذ ذلك علي عدة مربعات وهستعمل اربع مفاتيح لعمل ذلك طبعا انا عندي الكود وشغال معي ووضعته في حدث مفتاح للاعلي وحدث مفتاح للاسفل وشغال تمام بث انا عاوز اعمل مفتاحين كمان ومربعين نص اخرين فما ظبطت معي فقلت ممكن تتعمل عن طريق موديل فما عرفت اتوصل لحل . فنشاء الله يكون الحل عندكم وجزاكم الله خيرا طبعا انا استخدمت الكود ده عن طريق الحدث مفتاح للاسفل وعملة مفتاح اخر لنقل التركيز الي مربع نص اخر في حدث مفتاح للاسفل فعندي مربعين نص اخرين اريد وضع حدث لهم لنقل التركيز اليهم انا استخدمت مفتاح سهم للعلي وسهم للاسفل واريد ان استخدم سهم لليمين وسهم لليسار في المربعين الاخرين وجزاكم الله خيرا If KeyCode = 40 Then Me.barc.SetFocus End If

تفضل اخي اخر تعديل علي برنامجك my projet 2018..rar

انا اسف اخواني اني اتأخرت عليكم في رفع البرنامج تفضلو اخواني البرنامج ولا تنسونا بالدعاء برنامج ارشيف صادر وارد.rar

تفضل اخي التديل انشاء الله يكون المطلوب mm.rar

تفضل اخي حل مشكلة الرساله الي بتظهرلك my projet 2018..rar

تفضل اخي التعديل الاخير my projet 2018..rar

تقدر تعمل تحديث للباسورد

بعد اذنك استاذي ومعلمي الفاضل sandanet مرفق به مثال اجابة علي السؤال my projet 2018..rar

اليك المثال بعد التعديل ولتعديل اسم الجدول من الكود اسم الجدول tabol_2 u عدله الي ما تريد DoCmd.RunSQL "INSERT INTO tabol_2 (id_no,item_nem,item_cood)values(id_no,item_nem,item_cood)"

اخي الفاضل صيغة الملف Mdb وللتاكيد حملته من الموقع اشتغل عندي ما في مشكله