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

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


الملفات المرفقة
.zip   WindowsApplication1.zip (الحجم : 99.49 ك ب / التحميلات : 16)
الرد
تم الشكر بواسطة:
#2
وعليكم السلام

تفضل أخي وكل عام وأنت بألف خير


الملفات المرفقة
.rar   WindowsApplication1.rar (الحجم : 55.97 ك ب / التحميلات : 18)
الرد
تم الشكر بواسطة: العيدروس , أسعد
#3
رمضان كريم اخي اولا اشكرك على المساعدة و بارك الله فيك .لكن ليس هذا هو المطلوب انا لا اريد اغير قيم الجدول FieldOption كاملا .انا اريد تغيير قمة السطر الاخير فقط و حسب شروط معينة
الرد
تم الشكر بواسطة: أسعد
#4
(23-04-21, 06:06 PM)العيدروس كتب : رمضان كريم اخي اولا اشكرك على المساعدة و بارك الله فيك .لكن ليس هذا هو المطلوب انا لا اريد اغير قيم الجدول FieldOption كاملا .انا اريد تغيير قمة السطر الاخير فقط و حسب شروط معينة


الملفات المرفقة
.rar   WindowsApplication1.rar (الحجم : 55.33 ك ب / التحميلات : 16)
الرد
تم الشكر بواسطة: العيدروس , أسعد
#5
ليس المطلوب اخي .. ارجو بعد اذنك قراءة ما كتبته بارك الله فيك و كمان العمل لازم يكون بالكود على قاعدة البيانات و ليس فقط على الداتاجريد .. لان الداتاجريد غير ضروري اطلاقا و يمكن حذفه و انا وضعته فقط للتوضيح شكرا

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

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

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

فيه شي ناقص وضحه
الرد
تم الشكر بواسطة: أسعد
#7
فقط شوف لو سمحت المشاركو رقم 1
الرد
تم الشكر بواسطة: أسعد , أسعد
#8
اخي الفاضل
ايا كان ما تريد
عطيتك حل
تقدر تضيف كود تعديل مكان الشرط لو تحقق والمكتوب بالعربي

تحياتي
الرد
تم الشكر بواسطة: أسعد , العيدروس
#9
(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 



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

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

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال عن تاريخ اليوم seif mohamed 0 24 منذ 4 ساعة مضت
آخر رد: seif mohamed
  [VB.NET] التحكم بالترقيم التلقائي بناء على قيمة مربع نصي مسلم_١ 0 66 30-11-21, 06:20 AM
آخر رد: مسلم_١
  [VB.NET] كيفية تحويل قيمة textbox الي hex ابو ياسين ويزن 2 131 29-11-21, 09:35 PM
آخر رد: ابو ياسين ويزن
  اريد عمل استعلام على الوقت الاقل كما بالصورة new_programer 5 175 27-11-21, 01:52 AM
آخر رد: new_programer
  اريد كود حفظ تاريخ الى الاكسس غدير الصليحي 4 162 23-11-21, 04:12 PM
آخر رد: غدير الصليحي
  زيادة عدد من السنوات لحقل تاريخ atefkhalf2004 13 676 21-11-21, 10:42 PM
آخر رد: asemshahen5
  عرض تاريخ غدا nabil.1710 1 98 19-11-21, 01:18 AM
آخر رد: ابو انس
  [سؤال] زيادة رقم واحد بعد اكبر رقم في العمود غدير الصليحي 8 227 17-11-21, 09:37 PM
آخر رد: غدير الصليحي
  تنسيق قيمة في اكسل ك نص atefkhalf2004 3 275 02-11-21, 02:39 AM
آخر رد: atefkhalf2004
  استعلام يرجع اسماء الاعمدة و نوع البيانات في جدول معين بسام محمدغانم 1 277 23-10-21, 01:35 AM
آخر رد: بسام محمدغانم

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم