TQTHAMI

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

عندي نموذج مستمر وبه عدة حقول  ارغب في نقل كافة محتويات الحقول المدخلة الى جدول اخر 
تمت المجاولة ولكن لا ينقل سوى سجل واحد فقط 

المطلوب نقل كل الحقول الظاهره في النموذج

ولكم خالص التحية

Database12.accdb

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

هذا مثال لـ التحكم في موقع النماذج 

التحكم في موقع النموذج.accdb

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

مهما قدمت من كلمات شكر لا أستطع أن أوافيك حقك
فأنت فعلت الكثير وقدمت لي يد العون كثير

فأنت من الأشخاص اللذين أوجدهم الله سبحانه وتعالى في حياتنا على شكل نعمة تستحق منا الشكر.

أتمني لك من أعماق قلبي أن يمن الله عليك بالخير والصحة والعافية تقديراً لما قدمته لي وللجميع من مساعدات واعمال في سبيل سعادتهم  
و كما قال رسول الله صلى الله عليه وسلم: ( من صُنع إليه معروف فقال لفاعله جزاك الله خيرًا فقد أبلغ في الثناء )

فجزاك الله خيرًا

4444.rar

السلام عليكم ورجمة الله وبركانه 

اخي  kanory  يسعد لي مساءك ومساء الجميع بالخير

لم يخلق احد من بطن امه عالم 

أن الخطأ وارد وممكن من الكل ولكن الساعي للإصلاح يجب ان بتحلى بالرد الجميل ولبس بهذا الأسلوب 
 وإنما يكتب ما يراه مناسب ويبدي الحلول التي  يراها مناسبة تفيد الشخص المبتدي او المتعلم  دون أن يكون هناك نوع من السخرية حنى وان كان ما قام به الشخص خطاء في خطاء

تقبل ردي بصدر رحب 

لكم خالص  التحية

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

والهدف منه معرفة دخول الموظف على الجهاز ومعرفة خروجه ومعرفة الوقت الذي قضاه بالعمل على الجهاز 

Database6.accdb

مرفق مثال

الشياب يتمتعوا  بالحكمة والوقار وكلنا شياب

اخذت السنين حقها في وقتها 

شكرا لك 

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

لدي نموذج به آمر خيار (OPTION) عند الضغط على الخيار يتم تكبير الشاشة

المطلوب

عند إلغاء الخيار (OPTION) يتم ارجاع الشاشة لوضعها الطبيعي السابق

عملت هذا الكود ولكن لم اعرف كود الارجاع

Private Sub ch_Click()
If ch = True Then
DoCmd.Maximize
End If
End Sub

واكم خالص التحيه

Database4.accdb

تحية عطره للجميع 

مشاركة 

تغير اللغه.mdb

هلا وغلا اهي أبو اخمد

الله يسعد اوقاتك وأوقات كافة الاخوة بالسعادة

اشكرك من القلب على سرعة تجاوبك

الحمد لله تمام  كان الخطاء مني أثناء النقل 

الف الف شكر يا أبو احمد

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

عندي نموذجين الأول فيه الوقت  والنموذج الثاني فيه وقت بداية العمل  ومدة العمل بالساعات ووقت انتهاء العمل

المطلوب عملة في النموذج الثاني الوقت المتبقي والوقت المتبقي مفصل

Database1.accdb

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

اسعد الله اوقاتك واوقات الجميع  بالخير والسعادة 

أولا اعتذر عن التأخير على الرد

ثانيا

هلا وغلا اخي أبو احمد نسال الله ان تكونوا بصحه وعافية

هكذا هي الحياة

ليست سعادة دائمة ولا حزن دائم

تحتاج منا الصبر في المحن

والحمد في النعم والمحن أيضًا

فمشاغل الحياة تمنعنا أحياناً عن التواصل

للأسف اخي أبو احمد ليس هذا المطلوب وانا واثق بان الخطاء مني في عدم نوصيل الفكرة بالشكل الصحيح

الذي احتاجه عند احتيار رقم فقاسة يظهر لي الموجود الحالي فيها ممكن يكون ادحال البيض مستمر فـ لكي اعرف العدد الموجود في الفقاسات  عند ادخال جديد يظهر لي الموجود

تحياتي للجميع

السلام عليكم

اسعد الله اوقاتكم

ابي اعرف المجموع السابق لكل فقاسة بمعنى اذا اخترت رقم فقاسة يظهر لي العدد السابق لها 

مرفق مثال 

Database20.accdb

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

موجود بداخل  الكود

123

هذا نموذج لـ  أوقات الصلاة فقط  ولعدم تمكني من رقع الملف الخاص بالصوتيات لكبر حجمة
 اعمل ملف بجوار البرنامج باسم adan وضع فيه ملفات صونيه بامتداد  .wav

وان شاء الله يضبط معك 

عندي شغال 100%

الصلاة.accdb

نعم اخي  jjafferr   جربته ولم بنجح

الأخ  ناقل شكرا لك تقريبا هذا ما اردت 

ولكن لصعوبة حله اكتفيت بالعمل ان يكون النموذج مباشر 
حتى لا اتوقف على هذي المشكلة

شكرا لكم جميعا   

للأسف نفس الشي لكن رفعن لم المثال وبه الطريقة التي ارغب عملها في النموذج الفرعي

Database32.accdb

للأسف اخي نفس الشي عملتها كلها وكلها تقبل الاصافة والتعديل

ممكن تطبقوها على المثال

ولكم جزيل الشكر

2 ساعات مضت, jjafferr said:

me.frm.form.AllowEdits = true       'اسمح بتغيير البيانات
me.frm.form.AllowDeletions = true   'اسمح بحذف السجل
me.frm.form.AllowAdditions = true   'اسمح بإضافة سجلات جديدة

هذا يعمل على فتح نموذج مستقل
ولكن انا احتاجه كما هو موضح في المثال

هلا وغلا 

اهلا بالأستاذ الكبير

بشرفني مرورك

لكن يبدو اني ما عرفت أوصل المعلومة بالشمل الصحيح

لكن المثال يبين مطلبي

Database32.accdb

frm.SourceObject = "frm3"

هنا يفتح الفورم 3 من خلال النموذج الفرعي تمام 

 'DoCmd.OpenForm "frm3", acNormal, "", "", acReadOnly, acNormal
 'DoCmd.OpenForm "frm3", acNormal, "", "", acAdd, acNormal
 'DoCmd.OpenForm "frm3", acNormal, "", "", acEdit, acNormal

لكن عندما اردت انه يفتح بأحد هذي الطرق لا يقبل عملت هي الطريقة

 frm.SourceObject= "frm3", acNormal, "", "", acReadOnly, acNormal

واعرف انه الخطاء مني ولكنها اول مره تمر علي ولم اشاهدها من قبل فيا ليت احد يعدل لي الكود

تحياتي للجميع

ماشاء الله عليك 

سرعة استجابة وخو المطلوب بارك الله فيك 

تجياتي لك

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

يوجد نموذج به قائمتين منسدلتين 

المطلوب القائمة الأولى بظهر يها كافة الجداول الموجودة بالبرنامج 

والقائمة الاحرى نفس الفكرة بظهر يها كافة النماذج الموجودة بالبرنامج 

وتقبلوا خالص التحية والتقدير 

Database29.accdb