منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[مشروع] مشكلة في جملة Select لمشروع تسديدات شهرية ارجو المساعدة من كل ذوي الخبرة - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [مشروع] مشكلة في جملة Select لمشروع تسديدات شهرية ارجو المساعدة من كل ذوي الخبرة (/showthread.php?tid=24235)

الصفحات: 1 2

مشكلة في جملة Select لمشروع تسديدات شهرية ارجو المساعدة من كل ذوي الخبرة - الحسين احمد - 19-03-18

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



اعمل على مشروع و به جزئية احترت فيها و هي عبارة عن  تحصيل شهري و يتكون من اضافة عملاء في فورم و تسديد مبلغ شهري في فورم آخر لكل عميل ثم معرفة الذين لم يسددوا كل شهر و عرضهم في داتا جريد فيو



المشكلة كيف استعلم عن العملاء الذين لم يسددوا ؟؟ 


ملاحظات:

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

* مثلا نحن في شهر اكتوبر 2018 و العميل يريد ان يسدد 5أشهر من اكتوبر 2018 الى فبراير 2019 

* يكون الاستعلام عن العملاء الذين لم يسددوا في شهر معين يتم اختياره او الشهر الحالي



علما بأن المشروع بالفيجوال بيسك دوت نت 2010 و قاعدة بيانات اكسيس 2007



مرفق جزء من المشروع (الجزء الذي به المشكلة) 



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



و شكرا مقدما لكل من يقدم لي يد العون

RE: مشكلة في جملة Select لمشروع تسديدات شهرية ارجو المساعدة من كل ذوي الخبرة - الحسين احمد - 20-03-18

up
up 
up

RE: مشكلة في جملة Select لمشروع تسديدات شهرية ارجو المساعدة من كل ذوي الخبرة - السيد الجوهري - 20-03-18

(20-03-18, 02:30 AM)الحسين احمد كتب : up
up 
up

فى جملة select   اعمل شرط لعرض الزبائن أكبر من صفر  فى عمود الرصيد
كود :
SELECT Table1.ID, Table1.العميل, Table1.الرصيد FROM Table1  WHERE (((Table1.الرصيد)>0));


[attachment=17437]
[attachment=17438]
[attachment=17439]

RE: مشكلة في جملة Select لمشروع تسديدات شهرية ارجو المساعدة من كل ذوي الخبرة - عبدالله الدوسري - 20-03-18

أخي الحسين احمد
طلبك نظرياً مفهوم ,لكن (عملياً) طريقتك في تصميم قاعدة البيانات غير مفهومة

للتوضيح :
1 - ما الذي يدل أنه سدد لشهر معين ؟ ( من الجدول )
2 - ما هو الحقل الذي يدل على قيمة التسديد ؟
3 - ما هو الحقل الذي يدل على تاريخ التسديد , وهل تاريخ التسديد هو نفسة تاريخ الإستحقاق ؟
     مثال : نحن الآن بتاريخ ( 2018/03/20 ) قمت بتسديد القيمة الخاصة بشهر (يناير , شهر 1) والتي من المفترض أن يتم تسديدها (2018/01/31) في نهاية شهر (يناير) على سبيل المثال,
     وأنا متأخر عن الدفع لمدة تزيد عن الشهر,
            ((    هل التاريخ المسجل الآن في قاعدة البيانات , هو متى تم الدفع , أو تاريخ الإستحقاق لهذا التسديد .   ))
     وإن قام بتسديد عدة أشهر متصلة , ما الحقل الذي يدل أنه سدد من تاريخ كذا إلى تاريخ كذا (من اكتوبر 2018 الى فبراير 2019)؟
4 - وهل كلمة الرصيد تعني التسديد؟
5 - لماذا الحقول باللغة العربية ؟


[attachment=17441]
Big Grin Big Grin Big Grin Cool

RE: مشكلة في جملة Select لمشروع تسديدات شهرية ارجو المساعدة من كل ذوي الخبرة - السيد الجوهري - 20-03-18

بالعربيه للتوضيح فقط

RE: مشكلة في جملة Select لمشروع تسديدات شهرية ارجو المساعدة من كل ذوي الخبرة - عبدالله الدوسري - 20-03-18

(20-03-18, 03:59 PM)السيد الجوهري كتب : بالعربيه للتوضيح فقط

Big Grin Big Grin  عذراً لم افتح المرفقات في طلب أخونا الحسين احمد
فعلاً جميع الحقول بالإنجليزية .

وأغلب الأسئلة بنية على مثالك أخي السيد الجوهري
إعتقد انك قمت بالتعديل على نفس المشروع , لذلك لم افتح المرفقات بعد أن رأيت الصور في ردك أخي السيد الجوهري. ( إعتمدت عليك في الرد  Big Grin Big Grin  )

أعتذر :


جملة الإستعلام إذا ستكون كالتالي :

لجب جميع العملاء الذين لم يسددو شهر معين , 
كود :
    SELECT     Customers.ID,
            Customers.CustID,
            Customers.CustName,
            Customers.CustNaID,
            Customers.CustPhone,
            Customers.CustDate,
            Customers.CustYear,
            Customers.CustMonthPaid
    FROM Customers
    WHERE  
        (
        SELECT COUNT(*) FROM CustomerPay
        WHERE
            CustomerPay.ID = Customers.ID
            AND
            Month(CustomerPay.CustPayDate) = Month(Date())
            AND
            YEAR(CustomerPay.CustPayDate) = YEAR(Date())
        ) = 0 ;
[attachment=17444]






للبحث خلال السنة الحالية كاملة :
كود :
    SELECT     Customers.ID,
            Customers.CustID,
            Customers.CustName,
            Customers.CustNaID,
            Customers.CustPhone,
            Customers.CustDate,
            Customers.CustYear,
            Customers.CustMonthPaid
    FROM Customers
    WHERE  
        (
        SELECT COUNT(*) FROM CustomerPay
        WHERE
            CustomerPay.ID = Customers.ID
            AND
            Month(CustomerPay.CustPayDate) BETWEEN 1 AND 12
            AND
            YEAR(CustomerPay.CustPayDate) = YEAR(Date())
        ) = 0 ;
[attachment=17445]






للبحث عن الذي لم يسدد طوال حياتة ولا مرة واحدة :
كود :
    SELECT     Customers.ID,
            Customers.CustID,
            Customers.CustName,
            Customers.CustNaID,
            Customers.CustPhone,
            Customers.CustDate,
            Customers.CustYear,
            Customers.CustMonthPaid
    FROM Customers
    WHERE  
        (
        SELECT COUNT(*) FROM CustomerPay
        WHERE
            CustomerPay.ID = Customers.ID
        ) = 0 ;







جملة الإستعلام في الكود ستكون كالتالي :
كود :
       Dim sql As String = <sql>      

        SELECT Customers.ID,
               Customers.CustID,
               Customers.CustName,
               Customers.CustNaID,
               Customers.CustPhone,
               Customers.CustDate,
               Customers.CustYear,
               Customers.CustMonthPaid
       FROM Customers
       WHERE  
           (
           SELECT COUNT(*) FROM CustomerPay
           WHERE
               CustomerPay.ID = Customers.ID
               AND
               Month(CustomerPay.CustPayDate) = Month(Date())
               AND
               YEAR(CustomerPay.CustPayDate) = YEAR(Date())
           ) = 0 ;

       </sql>.Value













أو لتحديد التاريخ ( شهر , سنة ) :

كود :
       Dim sql As String = <sql>      

        SELECT Customers.ID,
               Customers.CustID,
               Customers.CustName,
               Customers.CustNaID,
               Customers.CustPhone,
               Customers.CustDate,
               Customers.CustYear,
               Customers.CustMonthPaid
       FROM Customers
       WHERE  
           (
           SELECT COUNT(*) FROM CustomerPay
           WHERE
               CustomerPay.ID = Customers.ID
               AND
               Month(CustomerPay.CustPayDate) = Month(Date())
               AND
               YEAR(CustomerPay.CustPayDate) = YEAR(Date())
           ) = 0 ;

       </sql>.Value.Replace("Month(Date())", "رقم الشهر الذي تريد").Replace("YEAR(Date())", "رقم السنة الذي تريد")



[attachment=17447]

RE: مشكلة في جملة Select لمشروع تسديدات شهرية ارجو المساعدة من كل ذوي الخبرة - الحسين احمد - 22-03-18

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

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

و هل يمكنك رفع المشروع بعد التعديل هنا ان كان متاح حيث هناك اشياء لم افهمها جيدا في الكود

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

RE: مشكلة في جملة Select لمشروع تسديدات شهرية ارجو المساعدة من كل ذوي الخبرة - عبدالله الدوسري - 22-03-18

التعديلات 


تم إضافة حقل جديد 
[attachment=17467]


الحقل الجديد في الصورة أعلاة ( تم ربطة ) مع الحقل في الصورة أدناة , بدون هذا الحقل الجديد في الصورة أعلاة لن نتمكن من معرفة من دفع ومن لم يدفع في الدجول أدناة
[attachment=17468]


هنا يظهر الحقل الجديد , بإمكانك إخافئة من الداتا قريد فيو, هو فقط لأغراض الإستعلام وربط السجلات من كلا الجدولين ببعضهم
[attachment=17469]


عند إضافة سجل التحصيل 
[attachment=17470]



[attachment=17471]







بالتوفيق
المشروع بعد التعديل :
[attachment=17473]

RE: مشكلة في جملة Select لمشروع تسديدات شهرية ارجو المساعدة من كل ذوي الخبرة - الحسين احمد - 23-03-18

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


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


و الف الف شكر لتعاونك الكبير و ربنا يكرمك و يجزيك عني كل خير

ملاحظة انا كنت عامل الخاصية Visible = false  لاختيار الشهر في فورم التسديد و مرفق الملف بعد تغيير الخاصية ل true

RE: مشكلة في جملة Select لمشروع تسديدات شهرية ارجو المساعدة من كل ذوي الخبرة - الحسين احمد - 26-03-18

up
up 
up