SANDANET

يا أخي جعفر والله انك عبقري ,, ماشاء الله تبارك الله عليك ..جبتها من الآخر :) حقيقة لم اتوقع ان يكون حلها بهذه السهولة .. ربي يحفظك لنا ويبارك فيك . :lol: أستاذي هنالك أمر أخير وهو لماذا لايستجيب الكود التالي عند عدم تطابق الشرط؟ DoCmd.GoToControl "Text38"

اهلا وسهلا من جديد أخي جعفر والحمد لله على سلامتك :) المنتدى اصبح مهجورا بدونك ههه.. بالنسبة لموضوعنا هذا فقد زودني الأخ ramhan بطريقة مختصرة لعمل تصفية للبيانات يتم فرزها في نموذج منفصل ..إليك المرفق التالي يوضح الطريقة ..لكن هنالك مشكلة وهي في خانة ادخال قيم…

up

أخي ramhan اشكرك جزيل الشكر على هذا التعديل الجميل والذي يختصر مجموعة كبيرة من الأكواد التي يمكن الاستغناء عنها باجراءات بسيطة كالتي تفضلت بها .. وأنا بدوري سأعتمدها لأنها أعجبتني كثيراً خصوصاً هذا الكود DoCmd.GoToRecord , , acGoTo, Forms!frm_main!form1.Form.C…

نعم أخي ramhan عند اضافة صفر او اي قيمة بالسالب فإن الكود لايرفضها وذلك لأن كود مبرمج على ان تكون القيمة المستلمة أقل من أو تساوي الكمية المطلوبة فقط .. أما لمنع القيم السالبة والصفر فيجب استعمال الكود التالي If Val(Me.Text38) <= Val(Me.amount) And Val(Me.Text…

أخواني هذا هو الكود الصحيح ..قد زوردني به أحد الأخوة الأفاضل بارك الله فيه If Val(Me.Text38) <= Val(Me.amount) Then

أشكرك أخي وليد على المحاولة لكن للأسف ليس هذا هو المطلوب :( المشكلة تكمن في الاتي ..في الملف المرفق هنالك نموذج رئيسي اسمه frm_main فيه نموذج فرعي يحتوي على بيانات .. عند الضغط دبل كلك على اي خانة من خانة البيانات فانه يقوم بفتح نموذج صغير اسمه frm_View_ONLY ي…

أشكرك أخي وليد على المحاولة لكن للأسف ليس هذا هو المطلوب :( المشكلة تكمن في الاتي ..في الملف المرفق هنالك نموذج رئيسي اسمه frm_main فيه نموذج فرعي يحتوي على بيانات .. عند الضغط دبل كلك على اي خانة من خانة البيانات فانه يقوم بفتح نموذج صغير اسمه frm_View_ONLY ي…

اجعل خاصية Autoresize = yes

استاذي الكريم جعفر ارجو ان يكون غيابك عنا فيه الخير.. وأنا لازلت انتظر الحل من حضرتك :)

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

اخي كافي اتمنى ان يفيدك المثال المرفق عمل نسخة احتياطية.zip

وأنا اضم صوتي لكم .. كما اتسائل عن حال بقية الأخوة عمالقة الاكسس كالاستاذ أمير فهو ايضاً اختفى بنفس الوقت الذي اختفت فيه استاذتنا زهرة :( ولانعلم مصيرهم الى الان

الادخال يتم قبوله في حال كتبنا الرقم كالتالي مثلاً 02 اما لو كتبته 2 فقط فلا يتم قبوله !!!

استاذي الكريم جعفر ارجو اعادة النظر في المثال لان المشكلة لم تحل بعد ..جرب غير الارقام في الجدول مثلاً ضع رقم 10 بدل 1 ستلاحظ ان المشكلة مازالت قائمة

اشكرك كثيراً استاذي الكريم جعفر على هذه المعلومات القيمة .. لكني لم أفهم ما المقصود بعبارة حقل غير مضمن ؟؟ يعني كيف يصبح الحق مضمن وكيف يتم التحكم في ذلك؟ كما ان المشكلة لازالت قائمة ..جرب غير الارقام في الجدول مثلاً ضع رقم 10 بدل 1 ستلاحظ ان المشكلة مازالت قا…

السلام عليكم ورحمة الله وبركاته ارجو من الأخوة الكرام تصحيح هذا الكود If Me.textbox1.Value <= Me.textbox2.Value And Me.Textbox1.Value > 0 Then docmd.... end if

استاذي الكريم جعفر هل بامكانك الاطلاع على المرفق التالي وهو لنفس المثال الاخير لكني اضفت إليه خانه للنموذج frm_View_ONLY لكن هنالك مشكلة وهي القيمة التي يتم ادخالها في الخانة الجديدة يجب ان تكون اكبر من الصفر وأقل او تساوي قيمة الخانة amount لكن الكود لا يستجي…

استاذي الكريم جعفر هل بامكانك الاطلاع على المرفق التالي وهو لنفس مثالك الاخير لكني اضفت إليه خانه للنموذج frm_View_ONLY لكن هنالك مشكلة ما ارجو الاطلاع عليها

أشكرك جزيل الشكر أخي جعفر على جهودك الجبارة هذه وسعة صدرك وتحملك عناء كتابة الأكواد باحترافية تامة ماشاء الله عليك .. تم انجاز المطلوب بنسبة 100% :D بارك الله فيك