السلام عليكم ورحمة الله وبركاته .
أخواني الاعزاء أبحث عن كود يقوم بالتالــي :
يجمع كافة الارقام بالحقل ( المسمى مثلاً المخرجات ) وبعد ذلك يقوم بتنقيصها من الحقل الاخر ( المسمى مثلا المدخلات)
مثلاً 5-3=2
الرجاء المساعدة في كتابة او ايجاد هذا الكود للأهميه القصوى اخواني الاعزاء.
هل الحقول التي تتكلم عنها في قاعدة بيانات ام انك تقصد textbox ؟
ما القيمة الموجودة في الحقل الاول التي تطلق عليها المخرجات.. ما وظيفة الحقل الاول والثاني كما ترد في برنامجك؟
Do as I say, not as I do
We are Anonymous. We are Legion. We don't forgive. We don't forget
السلام عليكم ورحمة الله
شكراً كثيرا لك اخي الكريم على حسن تعاونك .
الحقول هي في قاعدة البيانات
table name is FACTURE
field name is CARS
هدف البرنامج :
مثلاً : في حين بيع سياره يدخل الموظف ثمنها في مربع النص وايضا يدخل التاريخ في مربع نص اخر, ثم يضغط على زر إدخال ليتم ادخال المبلغ في الحقل المسمى - المدخلات -
أما في حالة شراء سيارة ودفع ثمنها , يدخل الموظف ثمنها المدفوع وايضا التاريخ , ويضغط زر إدخال ليتم ادخال الثمن في الحقل المسمى - المخرجات -
|| في نهاية الاسبوع يقوم الموظف بحساب مبيعات الاسبوع الماضي وذلك بإدخال تاريخ بداية الاسبوع ونهايته ليحسب له البرنامج مقدار الارباح او الخسائر في هذا الاسبوع وذلك عن طريق جمع حقل المدخلات وتنقيص مجموع حقل المخرجات منه - في تلك الفتره المحدده فقط- .
أرجو ان تكون قد وضحت الفكره وانا مستعد لأي شرح اخر ان كان غير مفهوم
بإنتظار ردكم اخواني الاعزاء,,,
تم تعديل هذه المشاركة بواسطة أبو غالب في 30 أبريل 2006 في 06:25
وفي انتظار الرد رجاءاً :)
مافي حل يا اخوان؟
فهمت عليك أخي الحبيب
تريد دالة كود يقوم بجمع عمود البيع لمدة اسبوع
و تقوم ايضاً بجمع عمود الشراء لمدة اسبوع
و بعدها تريد الفرق بين اسعار البيع و اسعار الشراء
:)
سامر عليك بإذن الله
إن كان هذا ا تريد
تمامااااااااااااااااااا أخي ابراهيم الطيب
هذا ما اريده
ياريت تساعدني وانا بإنتظارك.....
جزاك الله خير
أخى الكريم أبو غالب
حسابك لكمية المدخلات وكمية المخرجات خلال فترة معينة لا يعطيك قيمة الأرباح أو الخسائر، لأن البضاعة الداخلة خلال تلك المدة ليست بالضرورة هى نفس البضاعة المخرجة في نفس المدة، فقد تدخل سيارة مثلا وتظل موجودة وتباع سيارة أخرى كانت موجودة قبل المدة المحددة.
أما إذا أردت حل السؤال بالطريقة التى عرضتها، فيمكنك استخدام الكود التالي:
Dim Db As Database, Rs As Recordset, Net as Currency
Set Db=OpenDatabase("C:\Database.Mdb") ' قم بكتابة مسار قاعدة البيانات هنا
Set Rs = Db.OpenRecordset("Select Sum(Sales) As TotalSales, Sum(Purchases) as TotalPurchases From FACTURE") ' استبدل كلمة Sales باسم حقل المبيعات وكلمة Purchases باسم حقل المشتروات
Net = Rs!TotalPurchases - Rs!TotalSales
إذا كانت هناك أية استفسارات فأنا على أتم استعداد
الله في عون العبد ما كان العبد في عون أخيه
هذا الموضوع مغلق.