+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : رصيد الصنف عقب كل عملية (/showthread.php?tid=25139)
RE: رصيد الصنف عقب كل عملية - atefkhalf2004 - 29-05-18
إقتباس :اذا كان لا فقم بعرض جدول لجميع المنتجات
lموجود جدول الاصناف في قاعدة البيانات في المشاركات الاولي
RE: رصيد الصنف عقب كل عملية - elgokr - 30-05-18
(29-05-18, 11:29 PM)atefkhalf2004 كتب :إقتباس :اذا كان لا فقم بعرض جدول لجميع المنتجات
lموجود جدول الاصناف في قاعدة البيانات في المشاركات الاولي
لا اخى مش كده
اللى اقصده بيتم تصميم اجدول بنائاً على الاكواد الاستعلام
كما سبق وتم شرحه اذا كان من خلال Class او من خلال Sub
ومن ثم داخل زر او عرض Form يتم منادات هذا الكود داخل iif
اتمنى ان يكون وصلت الفكرة
تحياتى لك
RE: رصيد الصنف عقب كل عملية - atefkhalf2004 - 30-05-18
مش عارف حضرتك
وعندي يقين انك سوف تعمل استعلام واحد يعرض كارت الصنف من اي قاعدة مثل الموجودة اعلي
لان الحل المعروض صعب
RE: رصيد الصنف عقب كل عملية - elgokr - 30-05-18
(30-05-18, 01:04 AM)atefkhalf2004 كتب : مش عارف حضرتك
وعندي يقين انك سوف تعمل استعلام واحد يعرض كارت الصنف من اي قاعدة مثل الموجودة اعلي
لان الحل المعروض صعب
مستحيل اخى الفاضل
لفعل ذلك يجب بناء قاعدة بيانات تسهل هذه الامر
البرمجة نص المشوار وليس المشوار كله فى البرمجة
قعدة البيانات لها الاهداف الاكبر فى تسهيل امور البرمجة
مع العلم
انت تريد عمل كود اضافة من سطر واحد
وقد يوجد فى جدول قاعدة البيانات اكثر من 10 اعمدة مطالب بادخال بيانتها
وليس لديك جدول مخصص للمنتجات
لاتمام عمل ذلك لازم ان تتعلم Class
اذا كانت لم يسبق لك والتعامل مع ذلك وبناء مشروعك من خلالها
فانت تطلب مجرد الشكل كم لو واحد يريد الذهاب فى الفضاء فى اقل من ثانية
لم ناتى الى هذا الزمن بعد 
RE: رصيد الصنف عقب كل عملية - mrnooo2000 - 30-05-18
هذا الاستعلام يعطيك ما تريد لكل الاصناف
يمكنك عمل تصفية بكود الصنف للحصول على عمليات صنف واحد ( كارت صنف )
كود :
SELECT adraseed.atefinv, adraseed.itcod, adraseed.invsun, adraseed.purqu, adraseed.invqu, DSum('[purqu]','[adraseed]','[itcod] = ' & [itcod] & ' AND [atefinv] <=' & [atefinv])-DSum('[invqu]','[adraseed]','[itcod] = ' & [itcod] & ' AND [atefinv] <=' & [atefinv]) AS balance
FROM adraseed;RE: رصيد الصنف عقب كل عملية - atefkhalf2004 - 30-05-18
شكرا لكم جميعا
الاستاذ الجوكر وحضرتك
شكرا................................كثيرا
RE: رصيد الصنف عقب كل عملية - elgokr - 30-05-18
الشكر لله
وتمنياتى لك التوفيق
RE: رصيد الصنف عقب كل عملية - atefkhalf2004 - 31-05-18
هناك مثل عندنا في صعيد مصر
جاءت الحزينة تفرح لم تجد مطرح اي لم تجد مكان
اعتقدت ان الموضوع تم حله واجهتني مشكلتان
1-عند نقل الكود الي فيجوال بيسك وجدت الفيجوال يعترض علي امر dsum
2-المشكلة الثانية
انني كنت انفذه في اكسس وانا عامل المشروع في sql server فاجائني احد الزملاء ان الاستعلام في sql server غير اكسس
كيف انفذ الاستعلام السابق في جملة sql من خلال الفيجوال
PHP كود :
SELECT adraseed.atefinv, adraseed.itcod, adraseed.invsun, adraseed.purqu, adraseed.invqu, DSum('[purqu]','[adraseed]','[itcod] = ' & [itcod] & ' AND [atefinv] <=' & [atefinv])-DSum('[invqu]','[adraseed]','[itcod] = ' & [itcod] & ' AND [atefinv] <=' & [atefinv]) AS balance
FROM adraseed;
RE: رصيد الصنف عقب كل عملية - atefkhalf2004 - 01-06-18
كود :
command.CommandText = "SELECT a.itcod , a.invsun, a.purqu , a.invqu , (select sum(-invqu+purqu) from adraseed as b where b.itcod= a.itcod ) AS BALANCE FROM adraseed AS a where a.itcod= " & ComboBox1.SelectedValue & " "
command.CommandText = "SELECT a.itcod , a.invsun, a.purqu , a.invqu , (select sum(-invqu+purqu) from adraseed as b where b.atefinv <= a.atefinv and b.itcod= a.itcod ) AS BALANCE, a.invdate, a.atefinv FROM adraseed AS a where a.itcod= " & ComboBox1.SelectedValue & " ORDER BY a.invdate "
الاول يعرض الرصيد النهائي
والثاني لا يعرض الرصيد
في سكول والفيجوال
قاعدة سكول وفيجوال
شخص يحل لي الموضوع
RE: رصيد الصنف عقب كل عملية - atefkhalf2004 - 01-06-18
امر dsum ما مقبله في السكول
انا تعبت وتعبت الناس معاي