28-01-17, 09:03 PM
(آخر تعديل لهذه المشاركة : 28-01-17, 09:06 PM {2} بواسطة Marwan9990.)
(28-01-17, 05:18 PM)أسامة السالمي كتب :(28-01-17, 04:23 PM)Marwan9990 كتب : تم اخي رفعته ك مرفقات واسف بخصوص موقع تحميل ما ادري ليش ما يصير معكم..
هذا مشروعي الي ابي تعديل يكون في فورم اضافة مستخدم الجديد
للأسف مشروعك مربوط بقاعدة البيانات عن طريق الكود, لذلك لن أستطيع التعديل عليه.
لكن أحضرت لك كود آخر أتمنى أن يفيدك :
PHP كود :
Dim Before1 As Integer = 1
Dim Before2 As Integer = 2 ' سيكون التنبيه قبل تاريخ الانتهاء بهذا العدد من الأيام
Dim da1, da2 As Date
da1 = Today.AddDays(-Before1)
da2 = Today.AddDays(-Before2)
'ضع أمر البحث هنا
'ابحث في عامود تاريخ الإنتهاء
'كقيمة (da2) و (da1) استخدم
'ستظهر لك أسماء الذين تبقى على انتهائهم يومان
'اذا أردت تغيير عدد الايام الى ثلاثة أيام على سبيل المثال فسيلزمك اضافة متغيرات جديدة
'فاذا أردت ان تجعلها ثلاثة أيام فسيصبح الكود بهذا الشكل
'Dim Before1 As Integer = 1
'Dim Before2 As Integer = 2
'Dim Before3 As Integer = 2 ' سيكون التنبيه قبل تاريخ الانتهاء بهذا العدد من الأيام
'Dim da1, da2, da3 As Date
'da1 = Today.AddDays(-Before1)
'da2 = Today.AddDays(-Before2)
'da3 = Today.AddDays(-Before2)
'Me.DateTimePicker1.Value = da1
'كقيمة (da3) و (da2) و (da1) وستستخدم
انسخ الكود الى برنامج الفيجوال لتتمكن من قراءتها بسهوله
للا عليك ي غالي تشريف لي مرورك من هنا ومبادرتك بمساعده الي تسلم والف شكر لك ربي يرزقك جنات النعيم ..
ستفسار اخير بس لا هنت هل اضع هذا الكود في خانة التاريخ النهائي ? ام ماذا السموحه تعبتك بس لانه خبرتي قليله
(28-01-17, 07:37 PM)ابو ليلى كتب : الاخ السائل بما انك تعمل على قاعدة اكسس يمكنك الاستفادة من بعض الوظائف الجاهزة في القاعدة كما يلي
اصنع استعلام في القاعدة بهذا الشكل الموضح بالصورة
![]()
صورة عند تشغيل الاستعلام
![]()
كما ترى اصبح لدي جدول جديد (استعلام ) فيه حقل جديد (DateDifer) يقوم باحتساب الفرق بين تاريخين بالايام و ذلك حسب الدالة السابقة في الاستعلام DateDiff و هي تقوم بحساب الفرق بالايام بين تاريخين وفق الوسيطة "d" و يمكنك حساب الفرق بالشهور او السنة او بالساعات و ذلك بتغير نوع الوسيطة كما تريد
اشكال الوسائط
(yyyy) سنوات , (َq) دقائق , (m) شهر , (ww) اسابيع ...... الخ
بهذه العملية انت اختصرت على نفسك الوقت و الجهد و ارحت البرنامج من عملية الحساب و بقي لديك امر واحد فقط ان تقوم بالتشييك على هذا الحقل كل ما دعت الحاجة لذلك فاذا كانت قيمة الحقل اصغر من 4 مثلاً عندها يعطيك تنبيه بان هذا المستخدم بقي له اربع ايام على انتهاء صلاحيته و هكذا
الفكرة واضحة و بسيطة اتمنى لك التوفيق
اخي الكريم اولا اشكرك كثير الشكر لمرورك من هنا وتقديم المساعده الي ..
وبخصوص طريقتك مع الاسف ي اخوي ما بينفع اعمله كذا لانه يتعارض مع سبب تصميم ل هذا المشروع فالحقيقه انا طالب وادرس هذا الماده ولكن خبرتي للحين قليله ولكني اهدف الى تقديم بعض المساعده ل بعض الناس الغالين معي بتصميم هذا المشروع بعد طلبهم مني تقديم المساعده لهم ..
كرر شكري للك اخي الكريم
