ramy145236 قام بنشر ديسمبر 11, 2019 قام بنشر ديسمبر 11, 2019 السلام عليكم ورحمة الله تحياتي لحضراتكم جميعا اواجه مشكله من الصبح وعملالي ازعاج وكالعاده بلجأ للمنتدى الرائع الملف المرفق به نموذج اسمه crew form كان كل شئ شغال تمام تم اضافة جدول اسمه table 1 لاستخدماه في جلب معلومات للنموذج crew form ولكن بعد ان قمت بعمل العلاقه بين الجدولين لا استطيع ان اضيف سجل جديد وتضهر لي هذه الرساله ارجو من حضراتكم البحث معي عن حل crewing - Copy.rar
jjafferr قام بنشر ديسمبر 11, 2019 قام بنشر ديسمبر 11, 2019 وعليكم السلام 🙂 في الاستعلام مصدر بيانات النموذج ، اختار : . احفظ التغيير ، ثم افتح النموذج ، وكذلك اختار : . احفظ النموذج ، ثم قم بإضافة السجل 🙂 جعفر 1 1
mohamed elalfy قام بنشر ديسمبر 11, 2019 قام بنشر ديسمبر 11, 2019 شرف ليا والله العظيم مرور حضرتك الكريم متشكر جدا هو المطلوب
mohamed elalfy قام بنشر ديسمبر 11, 2019 قام بنشر ديسمبر 11, 2019 معلش يا استاذنا لو حضرتك عندك وقت ليه عند اختيار rank في النموذج مش بيظهر التحديث الا بعد ما اقفل وافتح اقصد بالتحديث يوجد 21 خانه في اقصى اليمين بيتغيروا مع تغير ال rank في امكانيه اني عند اختيار rank يتحدثوا مباشرة بدون غلق النموذج وفتحه جزاك الله كل خير استاذنا ومعلمنا جعفر
jjafferr قام بنشر ديسمبر 12, 2019 قام بنشر ديسمبر 12, 2019 همممم هل ramy145236 هو نفسه mohamed elalfy ؟؟ اذا كان الامر كذلك ، حتى نطلب من الاداردة دمج الاسمين ، فهذا مخالف للقوانين 🙂 جعفر 1
mohamed elalfy قام بنشر ديسمبر 12, 2019 قام بنشر ديسمبر 12, 2019 انا اسف بس رامي ده صديقي كنت طلبت منه انه يساعدني في الحل بس قالي انه رفعه على الموقع هنا متاسف جدا لو فيه سوء تفاهم
ramy145236 قام بنشر ديسمبر 12, 2019 الكاتب قام بنشر ديسمبر 12, 2019 سلام عيكم ورحمة الله وبركاته انا كمان بعتذر لو حصل اي شئ مخالف فعلا محمد كان طلب مني اني اجد حل للموضوع وانا حطيتطه على المندى لما مقدرتش الاقي حل وبلغته هو تابع الموضوع فعلا انا بعتذر
mohamed elalfy قام بنشر ديسمبر 16, 2019 قام بنشر ديسمبر 16, 2019 سلام عليكم ورحمة الله استاذ جعفر اتمنى تكون بخير لو استاذنك المشكله الي عرضتها من كم يوم ليها حل ولا لا كنت حضرتك رديت عليا ووجدت حل للمشكله محل السؤال ولكن واحهتني مشكله اخرى عرضتها فيما سبق هل ليها حل ولا لا ؟
jjafferr قام بنشر ديسمبر 16, 2019 قام بنشر ديسمبر 16, 2019 في ١٢/١٢/٢٠١٩ at 00:39, mohamed elalfy said: يوجد 21 خانه في اقصى اليمين بيتغيروا مع تغير ال rank من اين تأتي بيانات هذه الحقول الـ 21 ، على اي اساس تأتي ؟ لم اجد صله لهم !! جعفر 1
mohamed elalfy قام بنشر ديسمبر 16, 2019 قام بنشر ديسمبر 16, 2019 سلام عليكم استاذي بشكر حضرتك على مرورك الغالي العلاقه ان في جدول اسمه table1 في الجدول ده 21 حقل هم دول المطلوب ننقلهم في النموذج crew طبقا للتغير في rank بحيث عند اضافه سجل في نموذج crew عند ملئ خلية rank يحدث التغير هو شغال لكن التحديث مش بيظهر مباشرة لازم اقفل النموذج. وافتحه جزاك الله خيرا العلاقه الي استخدمتها لما Rank في crew بيسوي Rank في table يطهرلي المعلومات في جدول table انا كاتب كل ال ranks الي ممكن نستخدمها في Crew
jjafferr قام بنشر ديسمبر 16, 2019 قام بنشر ديسمبر 16, 2019 استعمل هذا الكود : Private Sub Rank_AfterUpdate() Me.document1 = Me.Text514 Me.[2] = Me.Text522 Me.[3] = Me.Text528 Me.[4] = Me.Text516 Me.[5] = Me.Text530 Me.[6666] = Me.Text534 Me.[6] = Me.Text258 Me.[7] = Me.Text260 Me.[8] = Me.Text262 Me.[9] = Me.Text284 Me.[10] = Me.Text270 Me.[11] = Me.Text266 Me.[12] = Me.Text272 Me.[13] = Me.Text276 Me.[14] = Me.Text274 Me.[15] = Me.Text278 Me.[16] = Me.Text280 Me.[17] = Me.Text282 Me.[18] = Me.Text286 Me.[19] = Me.Text288 Me.[20] = Me.Text290 Me.[21] = Me.Text497 End Sub جعفر 1
mohamed elalfy قام بنشر ديسمبر 16, 2019 قام بنشر ديسمبر 16, 2019 استاذي سلام عليكم من فضلك الكود بيتحط في اي نموذج Crew ولا Table
mohammmeed قام بنشر ديسمبر 16, 2019 قام بنشر ديسمبر 16, 2019 (معدل) . ظ تم تعديل ديسمبر 16, 2019 بواسطه mohammmeed
mohamed elalfy قام بنشر ديسمبر 16, 2019 قام بنشر ديسمبر 16, 2019 تعطيني نفس النتيجه لازم اقفل وافتح عشان يعمل تحديث للاسف لم تنجح اسف لو بتعب حضرتك
jjafferr قام بنشر ديسمبر 17, 2019 قام بنشر ديسمبر 17, 2019 تفضل المرفق 🙂 1149.crewing - Copy.accdb.zip 1
mohamed elalfy قام بنشر ديسمبر 17, 2019 قام بنشر ديسمبر 17, 2019 سلام عليكم الله يجزاك الخير انا جربت المرفق بس في rank مش شغال مش بيطلع نتائج في الخانات ولازم نقفل ونفتح عشان يحصل التحديث 3rd mate Elect. Asst. Elect ETO 4th Eng. Welder Mech. asst. Mech. Mech. Eng. Tuner ده بياكد ان المتحكم في الموضوع هو معادلة iff مش الاستعلامات والاكواد الي حضرتك ضفتها انا في قمة الخجل من حضرتك استحلفك بالله لو الموضوع سبب لحضرتك ضيق ممكن تصرف نظر عنه
jjafferr قام بنشر ديسمبر 17, 2019 قام بنشر ديسمبر 17, 2019 بدل الكود السابقة ، استعمل : Private Sub Rank_AfterUpdate() If Me.Dirty Then Me.Dirty = False Set rst = Me.RecordsetClone dim s as long S = Me.SERIAL Me.Painting = False Me.Requery rst.FindFirst "[Serial]= " & S Me.Bookmark = rst.Bookmark Me.Painting = True rst.Close: Set rst = Nothing End Sub جعفر 1
mohamed elalfy قام بنشر ديسمبر 17, 2019 قام بنشر ديسمبر 17, 2019 حاضر حالاً الله يعمر بيتك ويوفقك كل شئ تمام الحمد لله انا عاجز عن شكرك ربنا يجازيك عنا خير يارب وان شاء الله يكون في ميزان حسناتك
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.