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

أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .

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

كود :
       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

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

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

المتألق9

نيمو