[Marwan9990]

(28-01-17, 02:01 PM)أسامة السالمي كتب : الكود :

PHP كود :

Dim da1, da2 As Date
        da1 = Today
        da2 = DateTimePicker1.Value

        Dim DayDiff As Integer

        DayDiff = DateDiff(DateInterval.Day, da1, da2)

        If DayDiff <= "0" Then
            MsgBox("منتهي")

        ElseIf DayDiff = Val("3") Or DayDiff = Val("2") Or DayDiff = Val("1") Then
            MsgBox("تنبيه")

        ElseIf DayDiff >= Val("4") Then
            MsgBox("ساري")

        End If 


أتمنى يكون هذا اللي تحتاجه, لأني ما قدرت أنزل المشروع 

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



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



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

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

http://gulf-up.com/do.php?id=253975


واسف ع الاطاله الكبيره

---

(28-01-17, 02:54 PM)مساعدة كتب : السلام عليكم

جرب هذا التعديل، وانتظر تضع رد بالنتيجة
http://gulf-up.com/do.php?id=253962

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