mom20088

أخى العزيز

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

عندما وضعت الكود تظهر لى رسالة تتضمن اسم الحقل وليس قيمة الحقل نفسه

انا محتاج يكتب فى الرسالة قيمة الحقل نفسه وليس اسم الحقل

لو سمحت اكتب الرسالة بالانجليزى وليس بالعربى

اخى العزيز

اشكرك على ردك على استفسارى

ممكن اعرف يا اخى كيف اضع هذا الكود فى اى حدث وعلى اى من الحقلين

اخوانى الاعزاء

عندى حقلين الاول (text482) به قيمة حسابية والاخر (qproduced) قيمة يضعها المستخدم 

اريد عمل كود يقول الاتى :

ان قيمة الحقل الثانى (qproduced)  اعلى من قيمة الحقل الحسابى (text482)  مع ذكر قيمة الحقل ده فى الرسالة التى سوف تظهر لى

معنى اخر:

لو انا اضفت قيمة مثلا 200 فى الحقل (qproduced)  وكانت قيمة الحقل الحسابى(text482)   تساوى 100 

المطلوب: البرنامج يعطينى رسالة تقول " القيمة التى ادخلتها اكبر من 200 " بينما الحد الاقصى لك هو 100" سوف نحذف البيانات كلها

شكرا

ارجوكم ساعدونى

هاشرح الكود:

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

الكود بيقول عند الضغط على الزر يعطينى ثلاث خيارات نعم ولا وتجاهل 

نعم يقوم بحفظ السجل ولا تقوم بحذف السجل واخيرا التجاهل يقوم بغلق النموذج

حبيت اعدل فيه بحيث انه لما اقول نعم للحفظ يقوم بالحفظ ثم يسالنى مرة اخرى ان كنت اريد عمل سجل جديد او خروج أو الرجوع للشاشة الرئيسية (main) 

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

واخيرا عندما اقول له تجاهل الامر اللى هى بالانجليزى Cancel  يبقى الوضع على ما هو عليه ولايغير شئ

رجاء تعديل الكود الى ما اريد وجزاكم الله خيرا

Private Sub Command341_Click()
On Error Resume Next
Beep
Select Case MsgBox("do you want to save record ?" & vbCrLf & _
"", vbInformation + vbMsgBoxleft + vbYesNoCancel, "Attention!")
Case vbYes
MsgBox "Record is saved!"
DoCmd.GoToRecord , , acNewRec
Me.Production_Order.SetFocus

Case vbNo
DoCmd.OpenQuery "Query3"
MsgBox "Record Will be Deleted! ", vbOKOnly, "Attention!"
DoCmd.GoToRecord , , acNewRec
Me.Production_Order.SetFocus

Case Else
MsgBox "It was Ignore!"
DoCmd.RunCommand acCmdCloseDatabase
Me.Production_Order.SetFocus
End Select
End Sub

أشكركم على مجهودكم معايا وجزاكم الله خير الجزاء

اشكرك أخى العزيز على اجابتك على سؤالى 

لكن هناك مشكلة عندما وضعت الكود فى text482 بتحصل مشكلة معايا لان text482 حقل حسابى يعتمد على قيمة حقل تانى لذلك يلزم انى اعمل refresh  قبل ما الكود يشتغل 

انا محتاج طلب اخى العزيز :

انا  عملت مفتاح refresh فى النموذج ومحتاج اكتب كود يقول انى اول ما افتح النموذج يضغط على زر refersh عشان قيمة حقل text482 تتحسب معايا

شكرا

الاخوة الاعضاء 

كل عام وانتم بخير بمناسبة الشهر الكريم اعادة الله عليكم بالخير واليمن والبركات

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

If [Text482] = 0 Then
[Qproduced].Enabled = False
MsgBox "can not produce becuase the avalialbe limit of raw material is equal to zero"
Else
[Qproduced].Enabled = True
End If
End Sub
End

شكرا لكم يا اخوتى الكرام

اخى العزيز أبو عارف 

شكرا جزيلا لك لما افادتنى به

شكرا جزيلا يا اخى العزيز

ممكن سؤال اخى العزيز

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

معنى كلامى انه يوجهنى الى المنتج السجل من قبل والسنة المسجلة

السلام عليكم

ممكن مساعدة فى كتابة كود منع تكرار قيمة ( year -month target ) فى جدول month target

معنى السؤال:

انا عملت سجل فيه السنة 2016 واسم المنتج mm 

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

مرفق نسخة البرنامج

أشكركم

New Microsoft Access Database.rar

عندى قاعدة بيانات بها جدولين

الجدول الاول عبارة عن وارد للمخزن

الجدول الثانى عبارة عن منصرف من المخزن

عملت استعلام للرصيد النهائى 

السؤال:

عاوز اعمل حقل فى جدول المنصرف اسمه الرصيد وياخد القيمة النهائية للرصيد لكل مادة على حدة مع تاريخ تحديث الرصيد وكل ما اصرف من الجدول تضاف قيمة الرصيد والتاريخ فى سجل

يعنى لو عندى مادة رصيدها 500 كيلوجرام وصرفت منها النهاردة 200 كيلوجرام يبقى الباقى 300 كيلوجرام... يضاف سجل برصيد المادة والتاريخ

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

مرفق نسخة من قاعدة البيانات

11.rar

أخى العزيز 

أشكرك شكرا جزيلا على ردك

لو أمكن سؤال أخر يا أخى

حضرتك عملت الفرق بينهم(الوارد - المنصرف) وظهر الرصيد الله يباركلك

ازاى لو عندى حقل فى جدول ما اسمه الرصيد واخلى نتيجة الاستعلام بتاعى اللى حضرتك عملته يروح يتسجل فى حقل الرصيد

السلام عليكم يا اخوانى الاعزاء

عندى مشكلة بسيطة فى الاستعلامالبرنامج عبارة عن مواد خام للمصنع اشتريتها (الوارد) وصرفت جزء منها

انا محتاج اعمل استعلام بالكمية الواردة والكمية المنصرفة (حتى لوكانت صفر) يكتب صفر فى الكمية المنصرفة ويحسب الكمية المتبقية 

باختصار الموضوع

نعتبره مخزن فيه مواد خام وطبعا اكيد فيه وارد ومنصرف ورصيد

الوارد مكتوب فى الجدول رقم 1 والمنصرف مكتوب فى الجدول رقم 2 لكن مش كل المواد صرفتها فيه مواد لم تصرف .انا عاوز اظهرها فى الاستعلام وتكون قيمتها صفر ويحسب الفرق بين الواد والمنصرف ويكون هو الرصيد النهائى

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

1.rar

السلام عليكم اخى العزيز

اشكرك على ردك يا اخى 

الغرض من سؤالى هو تحويل كامل لملف قاعدة البيانات الى ملف فيجول بيسك ....لماذا؟ حتى لايفسد البرنامج او تحدث به مشاكل عند التشغيل

انا اسف لا استطيع تحميل المشروع لان حجمه 5 ميجا بعد الضغط

سؤال اخر يا اخى

هل اذا زاد حجم المشروع  الى20 ميجا يهنج ويعطى رسائل خطأ

السلام عليكم

كيفية تحويل قاعدة البيانات الى فيجول بيسك 

شكرا

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

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

ولكن لاتكتب كاملة ازاى اكتبها فى CODE BUILDER

شكرا

السلام عليكم

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

طبعا الجدول Conc مكرر ومرتبط بخانة فى جدول formulation

الارتباط ده مهم لانى بستدعى بيه بعض البيانات عشان يحسب بعض الحسابات

طبعا القاعدة ده بتخص برنامج تصنيع سماد  وعشان ابسطه شوية

هنعتبر ان السماد عباره عن بقلاوة وتركيبة البقلاوة من دقيق وسكر وزيت وطحين و لبن

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

الجدول التانى مهمته انى بيعطينى بعض البيانات الخاصة بكل مصدر عشان اعرف البرنامج يحسب حساباته

السؤال هو

ازاى اعمل نموذج يضم كل الجداول وفى ذات الوقت لو حبيت اضيف بعض الداتا فى المصادر اضيف ولو  اكتفيت بمصدرين فقط لا يعطينى اى رسائل خطأ

Database11.rar

انا بشكرك يا اخى على مساعدتك وحياك الله

حاضر

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

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

لما جيت عملت تحديث على الخانتين ده فى الجدول بافضل ادوس كليك اكتر من خمس مرات عشان يعمل تحديث 

طبعا انا عملت استعلام تحديث وعملت كود فتح الاستعلام فى خانة on Exit

اخى العزيز

انا اسف لان برنامج الاكسس عندى على 2010 ولا يوجد عندى فى ملف الحفظ اصدار اق فقط هو اصدار 2010

لو تسمحى لى تفسير اجبتك بدون اى كتاية حروف انجليزى اكتب بالعربى أو بالارقام

الاخوة الاعضاء

انا عملت استعلام تحديث لحقل فى الجدول بناء على قيمة فى النموذج وعمل الكود بتاعه فى on Exit

لكن التحديث بياخذ وقت اى بافضل اعمل كليك على القيمة فى النموذج عشان يحدث 

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

انا ارفقت البرنامج والاستعلام اسمه q1 

1.rar

تمام ولك مزيد من الشكر

بشكر حضرتك جدا على تعبك 

توضيح السؤال مجموع الاوزان 

مجموع الاوزان هيتم حسابه لجميع السجلات وانا اريد حساب مجموع الاوزان لكل كود خلطه على حده

الحقل بتاع الاوزان اسمه بالانجليزى weight

عذرا يا اخى حضرتك عملت المطلوب بالسؤال التانى

عندى استفسار بخصوص استعلام التح

تحديث بيانات فى الجدول بناء على النموذج

انا عملت استعلام والحمد شغال وعملت الكود بتاعة  on Exit

لكن التحديث لايتم الا بعد الضغط على زر update فى النموذج مرارا وتكرار

ازاى اعمل تحديث على طول بدون ما اعمل زرار للتحديث ويكون سريع

  الله أكبر .. اشكرك على ردك الجميل

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

1- ازاى افصل بين الخلطة رقم 1 والخلطة رقم 3 كل فى صفحة على حدة

2- ازاى اعمل مجموع اوزان الخلطة رقم 1 لوحدها

3- ازاى اعمل مفاتيح فى النموذج لعمل التقرير بتاع الخلطة رقم 1

ليه حضرتك لغيت تحديث الاستعلام q1

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

اخى العزيز:

جدول (Refernce)  ده عبارة عن تفاصيل المصدر 

  كلامى يعنى  الاتى: مصادر الاسمدة هى عبارة عن مواد كيميائية لو حضرتك تسمع عن اليوريا بتاعة الارض الزراعية ده بالنسبة للمصدر  وبالنسبة للجدول  الثانى هو بيانات كل المواد

الكيميائية ازاى يعنى انا اقولك يعنى اليوريا ده تحتوى على عنصر نيتروجين طيب وتركيز النيتروجين 46% زى ما هو مكتوب 

فيه مصادر تانية تحتوى على بوتاسيوم وفيه مصادر اخرى تحتوى على نيتروجين وفوسفور والخ

انا عملت ايه فى البرنامج 

لما احب اقول ان الخلطة ده فيها مصدر يوريا يقوم يستدعى بيانات اليوريا من الجدول الثانى reference

يقوم البرنامج باعطائى بيانات اليوريا اقوم انا احط انا التركيز المطلوب يقوم البرنامج بحساب الوزن المستخدم النهائى بناء على البيانات الموضوعة فى جدول Reference

اى خلطة سماد بتحتوى على كذا مصدر والمصادر كلها واحدة زى ما هى موضوعه فى جدول reference

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

بخصوص سؤال حضرتك مصادر الاسمدة ثابتة ...نعم هى ثابتة ولا توجد مصادر اخرى غير المكتوبة فى جدول reference

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

الحقول الاخرى total nitrogen

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

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

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

ازاى اعمل بقى تقرير للخلطة رقم واحد وافصل بين الخلطة رقم 1 والخلطة رقم 2 فى صفحة منفصلة لوحدها وازاى اعمل مجموع الاوزان على فكرة هتلاقى ان انا عامل مجموع الحقول فى الجدول بتاع الخلطة

ملحوظة

اليوريا بالانجليزى Urea

النيتروجين بالانجليزى Nitrogen

1.rar