أمير2008

هههههههههه كيفك أستاذ حماده ؟ أنا قبل تسجيل الدخول كنت على الانترنت و سمعت ضجيجاً وصراخاً داخل منتدى أوفيسينا فقلت أدخل المنتدى يمكن يكون هناك أعضاء يتعاركون أو شيئ من هذا القبيل فوجدتك تصرخ طالباً المساعدة هههههههه على العموم على حد علمي فأنت تحتاج للاستخدام دالة If وفي مثالك جرب التالي عند الضغط على زر الحفظ : On Error Resume Next DoCmd.SetWarnings False If MsgBox("هل تريد حغظ التغييرات", vbYesNo, "الجفظ") = vbNo Then Cancel = -1 Me.Undo DoCmd.SetWarnings True Else If Nz(Me.student_name, 0) = 0 Or Nz(Me.gender, 0) = 0 Or Nz(Me.faculty, 0) = 0 Or Nz(Me.class, 0) = 0 Or Nz(Me.entry_data, 0) = 0 Then MsgBox ("هناك حقول لم يتم كتابتها") If Nz(Me.entry_data, 0) = 0 Then Me.entry_data.SetFocus If Nz(Me.class, 0) = 0 Then Me.class.SetFocus If Nz(Me.faculty, 0) = 0 Then Me.faculty.SetFocus If Nz(Me.gender, 0) = 0 Then Me.gender.SetFocus If Nz(Me.student_name, 0) = 0 Then Me.student_name.SetFocus Else DoCmd.GoToRecord , , acNewRec End If End If

تمام فهمت أنك تعمل على تصميم برنامج مبيعات ويتوقف التعديل أو الاستمرار على احتياجاتك المطلوبة من البرنامج (الأهداف) مثلاً : المفترض أن الكمية أو رصيد الصنف لا تكتب بجدول الصنف وإنما تحسب من الكمية المشتراه مطروحا منها الكمية المباعة لكن هل تحتاج لتسجيل المشتريات كفواتير ؟ بصورة عامة فبرنامجك حاليا يمكن يخرج القماش هههههههه هذا تعبير عندنا نقوله اذا نجح شيئ وأنتج .

سبحان من ألف بين القلوب

أضفت لك نموذج بحث يمكنه أن يتجاهل الاختلاف في الهمزة والياء والواو و ؤ لكن محتاج تجربة منك 11112.rar

وعليكم السلام ورحمة الله الله يكرمك أستاذ غريب وشكرا على التشجيع وطبعا الشكر للأستاذ @رمهان حيث استوحيت الفكرة من مشاركته يمكنك حذف كود الاخفاء من النموذج frm_1 Forms!form1!Sb_2.Form.Visible = False - وعمل النموذج الثالث كنموذج مستمر كما كان لتتوالى الأصناف لكن لن تتوالى الأصناف طالما أن اخترت الضغط على صنف واحد لرؤية تفاصيله أهم شيئ في الموضوع كله هذا الكود : b = "b" & i Me.Controls(b).Caption = rs!Iname السطر الثاني مقتبس من فكرة أ/ رمهان وهو كود هام جدا يربط بين عنوان الزر وبين الصنف بالجدول أما السطر الأول فلا أعلم ماذا أقول عنه ... بسيط لكن جميل وظيفته المرور على كافة الأزرار b = "b" & i

ممتاز بارك الله فيكم مجهود رائع وهذه طريقة أخرى مشابهة لفكرة أ/ رمهان يعني زي ما بيقولوا الجماعة الهنود في دول الخليج same same وبالمثال تختار نوع المجموعة فيظهر أصنافها تلقائيا ومرتبة على أزرار وتختفي باقي الأزرار وعند الضغط على احدى الأزرار يظهر بيانات الصنف في النموذج الثالث food3.rar

برنامجك جميل وأستأنك في الاحتفاظ به واستخدام أجزاء منه وقت الحاجة وسأتابع تعديلاتك أكيد طبعا يمكن الترحيل لجدول مستقل لكن الأفضل يتواجد بالجدول مع اضافة حقل : انهاء (نعم/لا ) وفي الاستعلام تشترك أن يكون الموظف : حقل الانهاء : لا وفي حالة اعادته تقوم بازالة علامة الصح من الشيك بوكس لتتحول إلى لا

احذف الوحدة النمطية openfile افتح الوحدة النمطية fileOpen وغير الأسطر : Private Declare Function GetOpenFileName Lib "comdlg32.dll" Alias _ "GetOpenFileNameA" (ofn As OpenFileName) As Boolean Private Declare Function GetSaveFileName Lib "comdlg32.dll" Alias _ "GetSaveFileNameA" (ofn As OpenFileName) As Boolean إلى : Public Declare Function GetOpenFileName Lib "comdlg32.dll" Alias _ "GetOpenFileNameA" (ofn As OpenFileName) As Boolean Public Declare Function GetSaveFileName Lib "comdlg32.dll" Alias _ "GetSaveFileNameA" (ofn As OpenFileName) As Boolean وجرب

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

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

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

تمام بس تأكيد على طلبك : القطاع يحتوي أكثر من فرع ثم الفرع يحتوي أكثر من شركة ؟ أم : القطاع يحتوي أكثر من شركة ثم الشركة تحتوي أكثر من فرع ؟ ------------ سؤال آخر للاحتفاظ ببياناتك : الجدول الذي بياناته بها : ( أكتوبر - شل و ABB و ATM ..... ) هو جدول للأفرع أم للشركات ؟ والجدول الذي بياناته بها : (QNB و بنك المشرق ..... ) هو جدول للأفرع أم للشركات ؟ ------------- سؤال آخر : مصطلح الموقع تقصد به : فرع أم شركة أم قطاع ؟

ياباشا ده شغل ممتاز الله ينور أنا جربت في نموذج البيانات الشخصية ( الموقع - القطاع - الفرع ) وأعتقد أنك تريد : عند اختيار قطاع يظهر المواقع الخاصة به في قائمة الموقع وعند اختيار موقع يظهر الأفرع (الشركات) الخاصة به في قائمة الفرع (الشركة) أليس هذا صحيحاً وهو ما تريد تنفيذه ؟

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

احدى الطرق empy.rar

ممتاز حاول تضيف امكانية ارفاق ملف

الملف عندي شغال تمام

بعد إذن أستاذنا محمد نجار أ/ محمد 7172 : العلاقات مهمة جدا طبعا ولا خلاف على ذلك إلا عندنا في القرية فشباب القرية من المبرمجين ذوي الخبرات الواسعة التي تتعدى ثلاثة أو أربعة أشهر في البرمجة اللحظية دايماً بيعملوا برامجهم بدون أي علاقات بين الجداول وفشلنا في اقناعهم ، وكل ما نحفظهم ازاي يعملوا علاقة : One to many ويرسموا نموذج ERD نلاقيهم يكتبوها ( ون تو ميني ) لكن بدون ما يعملوها بالفعل زي المثال ده واللي ترجم بياناتك لمطلوب يشبه مطلوبك persony.rar

الموضوع ده هدفه جميل بس في الكثير من الأحيان الاقتباس قبل الرد له أهمية ويفيد القارئ في فهم ما يريد كاتب الرد أن يقوله

كلامك ممتاز و أكيد طبعاً بس دايماً أحب تعدد الحلول لنفس المشكلة

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

جزاكم الله خيرا أ/ جعفر وزادكم من علمه

هههههههه لو عاوز نصيحتي ( بالرغم من أن المشكلة ليست واضحة لي ) فعليك أن تغير التصميم علشان تقدر تتحكم في الفراغات على سبيل المثال المرفق g.rar

ممتاز بس عندي سؤال ولا أتذكر أني سألت من قبل هنا بالمنتدى ههههههه الكود Rs.MoveLast: Rs.MoveFirst أنا رجحت أن معناه : انتقل للسجل الأخير ثم للسجل الأول ، فاذا كان اعتقادي صحيح فلماذا ينتقل للسجل الأول والمفترض أن ذلك يحدث طبيعاياً عند فتح النموذج ؟