منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
استبدال نتيجة الاستعلام بقيمة اخرى - نسخة قابلة للطباعة

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

استبدال نتيجة الاستعلام بقيمة اخرى - المتألق9 - 25-05-22

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

RE: استبدال نتيجة الاستعلام بقيمة اخرى - نيمو - 26-05-22

كود :
       Dim strselect As String = "SELECT * FROM Tble"

       For I As Integer = 0 To GetTable(strselect).Rows.Count - 1
           If GetTable(strselect).Rows(I).Item("Num2") = 0 Then

               Dim strupdate As String = "UPDATE Tble Set Num2 = 1 where num2 = 0"

               RunCommand(strupdate)
           End If

       Next
هذي بقاعدة بيانات اكسس