منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : استعلام عن اكبر تاريخ و اكبر قيمة في الحقلين
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2
السلام عليكم و رحمة الله 
رمضان مبارك و جمعة مبارك ان شاء الله
اخواني لو ممكن المساعدة بحثت و جربت و لم اجد الحل 
عندي حقل من نوع تاريخ FieldDate و حقل نصي FieldOption
اريد اذا كان تاريخ اليوم الحالي اكبر من آخر تاريخ بحقل FieldDate و آخر عبارة بحقل FieldOption مكتوبة ( متاح )
في هدي الحالة اذا تم وجود هذين الشرطين يتم تعديل العبارة في الحقل FieldOption من ( متاح ) الى ( غير متاح )
مثلا بالصورة التاريخ الاخير بحقل التاريخ مكتوب 22-04-2021 و العبارة بحقل الملاحظة مكتوب ( متاح ) و تاريخ اليوم 23-04-2021 اكبر من آخر تاريخ مكتوب في هدي الحالة تتغير آخر قيمة و تصبح ( غير متاح )

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

تفضل أخي وكل عام وأنت بألف خير
رمضان كريم اخي اولا اشكرك على المساعدة و بارك الله فيك .لكن ليس هذا هو المطلوب انا لا اريد اغير قيم الجدول FieldOption كاملا .انا اريد تغيير قمة السطر الاخير فقط و حسب شروط معينة
(23-04-21, 06:06 PM)العيدروس كتب : [ -> ]رمضان كريم اخي اولا اشكرك على المساعدة و بارك الله فيك .لكن ليس هذا هو المطلوب انا لا اريد اغير قيم الجدول FieldOption كاملا .انا اريد تغيير قمة السطر الاخير فقط و حسب شروط معينة
ليس المطلوب اخي .. ارجو بعد اذنك قراءة ما كتبته بارك الله فيك و كمان العمل لازم يكون بالكود على قاعدة البيانات و ليس فقط على الداتاجريد .. لان الداتاجريد غير ضروري اطلاقا و يمكن حذفه و انا وضعته فقط للتوضيح شكرا

(23-04-21, 06:12 PM)messry كتب : [ -> ]
(23-04-21, 06:06 PM)العيدروس كتب : [ -> ]رمضان كريم اخي اولا اشكرك على المساعدة و بارك الله فيك .لكن ليس هذا هو المطلوب انا لا اريد اغير قيم الجدول FieldOption كاملا .انا اريد تغيير قمة السطر الاخير فقط و حسب شروط معينة

وإياك أخي الكريم 

لو سمحت اقرأ الاقتباس السابق فهذا ما كتبته انت وهذا ما فعلته

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

تحياتي
(23-04-21, 04:08 PM)العيدروس كتب : [ -> ]السلام عليكم و رحمة الله 
رمضان مبارك و جمعة مبارك ان شاء الله
اخواني لو ممكن المساعدة بحثت و جربت و لم اجد الحل 
عندي حقل من نوع تاريخ FieldDate و حقل نصي FieldOption
اريد اذا كان تاريخ اليوم الحالي اكبر من آخر تاريخ بحقل FieldDate و آخر عبارة بحقل FieldOption مكتوبة ( متاح )
في هدي الحالة اذا تم وجود هذين الشرطين يتم تعديل العبارة في الحقل FieldOption من ( متاح ) الى ( غير متاح )

مثلا بالصورة التاريخ الاخير بحقل التاريخ مكتوب 22-04-2021 و العبارة بحقل الملاحظة مكتوب ( متاح ) و تاريخ اليوم 23-04-2021 اكبر من آخر تاريخ مكتوب في هدي الحالة تتغير آخر قيمة و تصبح ( غير متاح )

حاولت مع الملف المرفق لكن لم اصل للنتيجة
بارك الله فيكم و صوم مقبول ان شاء الله

(23-04-21, 06:06 PM)العيدروس كتب : [ -> ]رمضان كريم اخي اولا اشكرك على المساعدة و بارك الله فيك .لكن ليس هذا هو المطلوب انا لا اريد اغير قيم الجدول FieldOption كاملا .انا اريد تغيير قمة السطر الاخير فقط و حسب شروط معينة

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

PHP كود :
   Sub fill_datagridview()

 
       ' تعديل كل الاسطر التي تاريخ اقدم من تاريخ اليوم
        '
Dim ucmd As OleDbCommand = New OleDbCommand("UPDATE Table1 SET FieldOption='غير متاح' WHERE (FiledDate<NOW) AND (FieldOption='متاح')"Conne)

 
       ' تعديل فقط آخر تاريخ اقدم من تاريخ اليوم
        Dim ucmd As OleDbCommand = New OleDbCommand("UPDATE Table1 SET FieldOption='
غير متاح' WHERE Id=(SELECT TOP 1 Id FROM Table1 WHERE (FiledDate<NOW) AND (FieldOption='متاح') ORDER BY FiledDate DESC)", Conne)

        Dim uda As OleDbDataAdapter = New OleDbDataAdapter()
        uda.SelectCommand = ucmd
        Dim udt As DataTable = New DataTable()
        uda.Fill(udt)


        Dim cmd As OleDbCommand = New OleDbCommand(" SELECT * FROM Table1", Conne)
        Dim da As OleDbDataAdapter = New OleDbDataAdapter()
        da.SelectCommand = cmd
        Dim dt As DataTable = New DataTable()
        da.Fill(dt)
        DataGridView1.DataSource = dt

    End Sub 



لعلي افدتك
(23-04-21, 10:46 PM)messry كتب : [ -> ]اخي الفاضل
ايا كان ما تريد
عطيتك حل
تقدر تضيف كود تعديل مكان الشرط لو تحقق والمكتوب بالعربي

تحياتي
شكرا اخي messry على المساعدة و بارك الله فيك احاول ان شاء الله

رمضان كريم اخي اسعد .بارك الله فيك اخي على المساعدة هو فعلا هذا يلي اريد عمله اشكرك جزيل الشكر .الكود فعلا يعمل لي ما اريده و يقول بالتعديل على آخر سجل لليوم السابق اذا كان ( متاح ) و يجعله ( غير متاح )
بقي لي فقط نقطة اخيرة لو سمحت 
بعد الكود يلي اعطيتني اياه اضفت رسالة عادية
msgbox(" لقد تم التعديل على الحقل   ")
لكن الرسالة تظهر لي دائما اريد يكون شرط اذا كان سجل موجود حسب الشروط و تم التعديل تظهر الرسالة و اذا كان يوم جديد و العبارة ( غير متاح ) طبعا الرسالة لا تظهر و بارك الله فيك
الصفحات : 1 2