أخواني أعضاء هذا المنتدى الكرام
وجهت مشكلة في قاعدة البيانات الخاصة بي حيث قمت بوضع عمليات حسابية في فيجوال في نموذج الاكسس لكن حتى يتم تحديث البيانات يجب أغلاق النموذج أو بضغط على f5 لتحديث البيانات
وأيضاً كيف أتعامل مع قيم null في فيجوال في الاكسس يتم وضع Nz فما يوضع في فيجوال
ارجو من الاخوان المساعدة وشكراً
اخي الفاضل : محمد
السلام عليكم ورحمة الله وبركاته
تستطيع استخدام الدالة NZ في الحقول ذات الطول NULL لكي تعود القيمة صفر في الحقل المطلوب
كما تستطيع وضع Me.Refresh في حدث بعد التحديث للحقل او تضع هذا الأمر في آخر سطر من الأوامر الموجود في الصوره ( بعد حقل المبلغ )
بالتوفيق
تم تعديل هذه المشاركة بواسطة zahrah في 7 ديسمبر 2011 في 14:41
zahrah كتب:اخي الفاضل : محمد
السلام عليكم ورحمة الله وبركاته
تستطيع استخدام الدالة NZ في الحقول ذات الطول NULL لكي تعود القيمة صفر في الحقل المطلوب
كما تستطيع وضع Me.Refresh في حدث بعد التحديث للحقل او تضع هذا الأمر في آخر سطر من الأوامر الموجود في الصوره ( بعد حقل المبلغ )
بالتوفيق
شكراً على رد
بس هل بالامكان استخدام Nz حتى في الفيجوال بيسك وتكون طريقه هكذا ([الكمية])Nz+([سعر]) Nz=
وشكرا
تم تعديل هذه المشاركة بواسطة محمد الجوهر في 7 ديسمبر 2011 في 21:27
اذا ما تفسير دالة أو عمل الدالة IS Null
اخي الفاضل : محمد الجوهر
الدالة Nz تستخدم بهذه الطريقة
=Nz([Quantity];0) * Nz([Price];0)
حيث اذا لم يكن هناك قيمه رقمية في احد الحقول فإنها تعود بالقيمة الى صفر
اما الدالة IsNull فإنها دالة اختبار وتأتي عادة مع IF الشرطية حيث نقول اذا كانت قيمة الحقل خالية او Null فستكون القيمة تساوي ( صفر ) وإلا تعود بالقيمة الى القيمه الخاصة بالحقل
مثال :
=IF IsNull ([Quantity]) Then [Quantity]=0 End IF
بالتوفيق
تم تعديل هذه المشاركة بواسطة zahrah في 7 ديسمبر 2011 في 23:11
شكراً
ولكن قمت بعمل نفس الطريقة المستخدمة لــــ Nz ولكن أعطني خطأ فهل هذا صحيح لما كتبت الكود اعطني طريقة الكتابة [ 0],[سعر]) Nz
تم تعديل هذه المشاركة بواسطة محمد الجوهر في 7 ديسمبر 2011 في 23:09
محمد الجوهر كتب:شكراً
ولكن قمت بعمل نفس الطريقة المستخدمة لــــ Nz ولكن أعطني خطأ فهل هذا صحيح لما كتبت الكود اعطني طريقة الكتابة [ 0],[سعر]) Nz
ما هي رسالة الخطأ التي تظهر ؟؟؟؟
الله غايتنا و الرسول قدوتنا و القرآن دستورنا و الجهاد سبيلنا و الموت في سبيل الله أسمى أمانينا
{حَتَّى إِذَا جَاءَ أَحَدَهُمُ الْمَوْتُ قَالَ رَبِّ ارْجِعُونِ*لَعَلِّي أَعْمَلُ صَالِحًا فِيمَا تَرَكْتُ*كَلا إِنَّهَا كَلِمَةٌ هُوَ قَائِلُهَا وَمِنْ وَرَائِهِمْ بَرْزَخٌ إِلَى يَوْمِ يُبْعَثُونَ}
alfarouk79 كتب:ما هي رسالة الخطأ التي تظهر ؟؟؟؟
قمت بأرفاق صورة من الكود المكتوب والخطأ الذي يظهر لي
شاكرين اهتمامكم وامساعدتكم
في انتظار ردك الكريم
اخي الفاضل
لماذا وضعت الصفر بين قوسين معقوفين [0]
هذا خطأ مع الدالة NZ
الصفر يكون لوحده بعد الفاصلة اما الحقول فهي التي تكون بين قوسين معقوفين
انظر الى الكود بعد التعديل
انسخ هذا الكود كما هو وضعه بدلا عن السابق
Private Sub Form_Current() [عدد الركاب] = Nz([رجال], 0) + Nz([نساء], 0) + Nz([أطفال], 0) [المجموع] = Nz([المبلغ], 0) - Nz([دفعة1], 0) - Nz([دفعة2], 0) - Nz([الخصم], 0) [المبلغ] = Nz([عدد الركاب], 0) * Nz([سعر الشخص], 0) End Sub
سيتم تعديل الكود في محرر الفيجول بيسك بطريقة صحيحة فقط لأنه هنا مكتوب بالعربي
بالتوفيق
تم تعديل هذه المشاركة بواسطة zahrah في 9 ديسمبر 2011 في 15:46
ألف شكر مغطى بالياسمين على عدم استثقالك لاسئلتي
تم وضع الكود بنجاح لكن مشكلة تحديث البيانات حتى الان قمت بوضع Me.Refresh بعد الكود الذي بالاعلي لكن لا جدوى يجب الضغط على f5 بل قمت بوضع refresh في الحقول التي تحتاج تحديث لكن لا جدوى
ارجو ايجاد المشكلة
اخي الفاضل
كل ما تحتاج اليه هو وضع زر أمر تحديث بيانات للنموذج فقط لا غير
Private Sub cmdREF_Click() DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70 End Sub
بالتوفيق
الاخت زهرة
قمت بعمل button وفي حدث click وضعت الكود الذي قمتي بكتابته في مشاركتك التي بالاعلي ولكن لا جدوى لم يتم تحديث البيانات تلقائياً .
هل يوجد حل ارجو لا تبخلوا علينا بالاجابة وشكرا
اخي الفاضل : محمد الجوهر
ضع مثالا بسيطا لما هو موجود لديك الأن حتى نرى اين المشكله لديك بالضبط وإن شاء الله يتم حلها
لأنني لا استطيع افادتك بالصور المعروضه من قبلكم فقد يكون هناك امور يجب اصلاحها في القاعدة
فقط ضع مثالا كما هو موجود بالكود لديك
بالتوفيق
تم تعديل هذه المشاركة بواسطة zahrah في 10 ديسمبر 2011 في 22:30
الاخت زهرة
مشكورة ومأجورين
تم ارفاق الملف
المشاكل التي أواجهها وهي في برنامج العمرة
1_ عملية تحديث البيانات تلقائياً حيث لما اقوم بتغيير بعض الارقام في النموذج لا يتم تحديث البيانات على اساسها تلقائياً وأنما يجب بضغط على f5
2_ يوجد حقل لرقم الرحلة هل بالامكان عمل رقم واحد لعدة عملاء أي كل رحلة يكون هناك رقم موحد للركاب الموجودين في نفس الرحلة بحيث يتم اصدار الرقم بضغط على button بحيث يكون رقم الرحلة موحد بينهم لأنهم بنفس الرحلة وفي حالة وجود رحلة جديدة يكون رقم مختلف وهكذا يتم اصدار رقم واحد في كل رحلة مختلف عن الثاني
فما هو أقتراحك وما الحل؟؟؟؟؟؟
3_بالنسبة للترقيم التلقائي ما هي طريقة لأعادت الترقيم من جديد
في انتظار ردكم
محمد الجوهر كتب:الاخت زهرة
مشكورة ومأجورين
تم ارفاق الملف
المشاكل التي أواجهها وهي في برنامج العمرة
1_ عملية تحديث البيانات تلقائياً حيث لما اقوم بتغيير بعض الارقام في النموذج لا يتم تحديث البيانات على اساسها تلقائياً وأنما يجب بضغط على f5
2_ يوجد حقل لرقم الرحلة هل بالامكان عمل رقم واحد لعدة عملاء أي كل رحلة يكون هناك رقم موحد للركاب الموجودين في نفس الرحلة بحيث يتم اصدار الرقم بضغط على button بحيث يكون رقم الرحلة موحد بينهم لأنهم بنفس الرحلة وفي حالة وجود رحلة جديدة يكون رقم مختلف وهكذا يتم اصدار رقم واحد في كل رحلة مختلف عن الثاني
فما هو أقتراحك وما الحل؟؟؟؟؟؟
3_بالنسبة للترقيم التلقائي ما هي طريقة لأعادت الترقيم من جديد
في انتظار ردكم
أخي الكريم
سلام الله عليكم و رحمته و بركاته
بالنسبة لكل نقطة :
1- تم التحديث التلقائي و ليس بالطريقة التي تريدها و انما بطريقة أخرى أتمنى ان تكون وافية بالغرض ... في المرفقات
2- على قدر استيعابي سيتلزم عليك عمل نموذج فرعي للعملاء و النموذج الرئيسي يكون للرحلات (واحد الى متعدد)
3- لست متأكدا من ذلك .
و العلم عند الله
بالتوفيق
الله غايتنا و الرسول قدوتنا و القرآن دستورنا و الجهاد سبيلنا و الموت في سبيل الله أسمى أمانينا
{حَتَّى إِذَا جَاءَ أَحَدَهُمُ الْمَوْتُ قَالَ رَبِّ ارْجِعُونِ*لَعَلِّي أَعْمَلُ صَالِحًا فِيمَا تَرَكْتُ*كَلا إِنَّهَا كَلِمَةٌ هُوَ قَائِلُهَا وَمِنْ وَرَائِهِمْ بَرْزَخٌ إِلَى يَوْمِ يُبْعَثُونَ}
شكراً لك أخي الفاروق
وبوركت وجمعنا الله معك بجنات الفردوس
مشكور على عملك جداً رائع ولكن مجموع عدد ركاب تم تحديث تلقائياً لكن باقي الحقول التي تحتاج ايضاً الى تحديث لم يتم تحديثه بل عطلت تمام ومنها سعر شخص يتم ادخاله يدوياً يعكس هذا في حقل المبلغ وذلك بعد ضرب عدد الركاب في سعر الشخص ينتج ذلك المبلغ لكن لا ادري ما سبب عطلت العملية أما بالنسبة لي رقم الرحلة في اعتقادي ان هنالك حل وهو بضغط على زر امر بأمكانه أعطاء رقم ولا يتجدد ذلك الرقم الا بضغط مرة ثانية على زر الامر لكن تحتاج العملية أحد الاخوان الخبراء في الاكسس يتكرمون علينا مشكورين غير مأمورين
جزاك الله خيرا
تم تعديل هذه المشاركة بواسطة محمد الجوهر في 13 ديسمبر 2011 في 14:11
محمد الجوهر كتب:شكراً لك أخي الفاروق
وبوركت وجمعنا الله معك بجنات الفردوس
مشكور على عملك جداً رائع ولكن مجموع عدد ركاب تم تحديث تلقائياً لكن باقي الحقول التي تحتاج ايضاً الى تحديث لم يتم تحديثه بل عطلت تمام ومنها سعر شخص يتم ادخاله يدوياً يعكس هذا في حقل المبلغ وذلك بعد ضرب عدد الركاب في سعر الشخص ينتج ذلك المبلغ لكن لا ادري ما سبب عطلت العملية أما بالنسبة لي رقم الرحلة في اعتقادي ان هنالك حل وهو بضغط على زر امر بأمكانه أعطاء رقم ولا يتجدد ذلك الرقم الا بضغط مرة ثانية على زر الامر لكن تحتاج العملية أحد الاخوان الخبراء في الاكسس يتكرمون علينا مشكورين غير مأمورين
جزاك الله خيرا
جزاك الله كل خير أخي الكريم
و غفر لك ذنبك و تقبل منك صالح عملك
ان شاء الله تجد المطلوب في المرفقات
تم تصحيح "حقل المبلغ" و اضافة "زر أمر" كما طلبت لادخال رقم الرحلة
و أعتذر عن عدم التصحيح فيما قبل لأني لا أعلم كيفية سير العملية الحسابية عندك على النموذج
و بنفس نهج (مجموع الركاب) و (حقل المبلغ) يمكن العمل على كل الحقول بسهولة
و لا تجد حرجا في أي سؤال لديك
فكلنا واحد و واحد كلنا
و بالتوفيق
الله غايتنا و الرسول قدوتنا و القرآن دستورنا و الجهاد سبيلنا و الموت في سبيل الله أسمى أمانينا
{حَتَّى إِذَا جَاءَ أَحَدَهُمُ الْمَوْتُ قَالَ رَبِّ ارْجِعُونِ*لَعَلِّي أَعْمَلُ صَالِحًا فِيمَا تَرَكْتُ*كَلا إِنَّهَا كَلِمَةٌ هُوَ قَائِلُهَا وَمِنْ وَرَائِهِمْ بَرْزَخٌ إِلَى يَوْمِ يُبْعَثُونَ}
جزاك الله خير على مساعدتك وعملك الممتاز
لكن هنالك عمليات حسابية لما يتم عمل له اي حدث العمليات الحسابية في البرنامج كتالي:
1_ مجموع النساء والرجال والاطفال يعكس لنا عدد الركاب (المشكلة هنا أن في حالة لما يكن هنالك أطفال اي قيمة null) لما يتم عمل حساب ذلك بحيث لو كان هنالك أحد هذه الحقول null لا يؤثر على العملية
2_ عدد الركاب ضرب سعر الشخص يعطيني المبلغ
3_ المبلغ مجموع مع حقل سعر الفندق (وأيضا في حالة احتمال ليس معلوم سعر الفندق لا يؤثر على العملية الحسابية أي Null)
4_المبلغ مخصوم منه حقل الخصم ومجموع معه الدفعة 1 والدفعة 2 وبعد ذلك يعطيني حقل المتبقي (وأيضاً يجب عمل حساب قيمة Null)
5_بالنسبة لرقم الرحلة جداً رائع صراحة لكن كان أفضل لو مافيه فاصلة وصفرين بل يضاف معه حرف انجليزي أفضل وأيضاً في حالة أردت ترجيع رقم اي كان الرقم واحد وبالغلط ضغطت على الزر وأصبح 2 هل هناك حل له بأن يرجع رقم السابق
هل بامكاني سماع اقتراحتك بخصوص النقطة الخامسة
جمعنا الله معك بجنات الفردوس ونسأل لنا ولك الثبات يوم السؤال (انا متواجد في الحرام المكي وهذا دعاء لك خاص)
هل من منقذ ومستجيب للنداء
هل من أعضاء يتكرمون بالمساعدة
الاخ الكريم محمد الجوهر تفضل الملف بعد تعديل ما اردت قدر امكاني
ارجو منك الدعاء لى بالتثبيتHajj&Omra Porgram V1_UP 2.rar
جزيت خيرا يأخي وزوجت حوراً في دار النعيم
في الحقيقة عملك إبداع
أخي
الحمدالله قربت على انهاء العمل وهذا من فضل الله ونعمه لكن قمت بمحاولة اضافة حقل سعر الفندق على حقل المبلغ في الفيجوال بيسك لكن لا جدوى دائما يفيد بأن حقل سعر الفندق غير معروف فهل أفدتني بطريقة حتى لا أكون ثقيلاً على نفس. وما معنى !Me
وهل أحد من الاخوان يفيدني بطريقة أو الكود الخاص بالحدث أعادة الترقيم التسلسلي.
وهل بالامكان عمل button لحذف سجل لكن في حالة الضغط في الاول يطلب رقم سري بعد ذلك تستطيع الحذف (اي تكون هنالك صلاحية على زر امر الحذف ولو شيء مبسط جداً) ارجو الحصول على الطريقة حتى اقوم بتطبيقها
اللهم فرج هم من قام بمساعدتي وأمر نفسه بحفظ كتابك الكريم وأجعل له القران نوراً يوم القيامة إنك سميعاً مجيب تعلم سراً وجهراً فأجب دعائنا فلا يعجزك شيء أنك أنت القدير
جزاكم الله خيرا
يأخووان وأين شجعان
هل من مجيب ومفيد
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…
