تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
المساعد
#1
السلام عليكم اخواني الكرام كل عام وحضراتك بخير
اريد المساعده
عندي فاتوره برقم ID  والفاتوره تحمل رقم مثلا B3 وبها عدة سطور وانا اريد ان اعدل سطر واحد في الفاتوره والمشكله عند تعديل سطر واحد اجد جميع السطور تم تعديلها بنفس البيانات يعني البيانات تكررت في جميع السطور التي تحمل رقم الفاتوره 
ارجوا التعديل علي هذا الكود فيجوال بيسك 2017 وقاعدة بيانات SQLITE
 ولكم جزبل الشكر

Try
            Using conn As SQLiteConnection = DatabaseConnection.GetConnection()
                conn.Open()

                Dim query As String = "UPDATE amel_21_d SET weight = @weight, wit18 = @wit18, many = @many, tota_am = @tota_am, name = @name, noty = @noty, type = @type WHERE inon_f = @inon_f"

                Using cmd As New SQLiteCommand(query, conn)
                    cmd.Parameters.AddWithValue("@weight", Txtwazn.Text)
                    cmd.Parameters.AddWithValue("@wit18", Txtch1.Text)
                    cmd.Parameters.AddWithValue("@many", TXTMANY.Text)
                    cmd.Parameters.AddWithValue("@tota_am", TextBox1.Text)
                    cmd.Parameters.AddWithValue("@name", Com_AMEL.Text)
                    cmd.Parameters.AddWithValue("@noty", Txtnoty.Text)
                    cmd.Parameters.AddWithValue("@type", Txtpye.Text)

                    cmd.Parameters.AddWithValue("@inon_f", Txtno.Text)

                    Dim rowsAffected As Integer = cmd.ExecuteNonQuery()

                    If rowsAffected > 0 Then
                        MsgBox("تم تحديث  بنجاح ")
                    Else
                        MsgBox("لم يتم العثور على الخلية المحددة ")
                    End If
                End Using
            End Using
        Catch ex As Exception
            MsgBox("خطأ: " & ex.Message)
        End Try


الملفات المرفقة صورة/صور
   
الرد }}}
تم الشكر بواسطة:


الردود في هذا الموضوع
المساعد - بواسطة رشاد حبيب - 16-04-24, 12:30 AM
RE: المساعد - بواسطة Taha Okla - 16-04-24, 12:47 AM

المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  اريد المساعد ضروري abdalaziz224 2 1,244 12-12-21, 10:56 PM
آخر رد: سعود
  [سؤال] الرجاء المساعد في الكريستال ريبورت nouribenyahia 3 1,745 22-01-20, 08:21 PM
آخر رد: nouribenyahia
  [VB.NET] اريد المساعد ميدو 4 2,629 13-06-18, 05:57 AM
آخر رد: ملهمـ
  [VB.NET] الرجاء المساعد بسرعه :( nedal24 2 2,140 20-04-15, 04:50 PM
آخر رد: nedal24

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


يقوم بقرائة الموضوع: