تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] الكود لا يعمل
#1
السلام عليكم ورحمة الله وبركاته

كتبت هذا الكود من أجل التأكد من عدم وجود اي تكرار للبيان قبل اضافته وفي حالة وجود البيان مسبقا لا يقوم بالاضافة ... ورغم ظهور رسالة التى تفيد عمل الكود إلا أن البيان يضاف .... وولم استطع معرفة ما هو الخطا بالضبط ... فهل من مساعدة




كود :
Try

            For i As Integer = 0 To Ds.Tables("OrderForm").Rows.Count - 1
                If CustTextBox.Text = Ds.Tables("OrderForm").Rows(i).Item("Cust").ToString Then
                    MsgBox("Order added Before !", MsgBoxStyle.Information)
                    Exit Try
                End If
            Next


            Dim R As DataRow = Ds.Tables("OrderForm").NewRow
            R(0) = OrderNoTextBox.Text
            R(1) = CustTextBox.Text
            R(2) = CustNoTextBox.Text
            R(3) = FactoryTextBox.Text
            R(4) = QtyTextBox.Text
            R(5) = RaiseOnTextBox.Text
            Ds.Tables("OrderForm").Rows.Add(R)
            Cmdb = New OleDbCommandBuilder(Da)
            Me.BindingContext(Ds, "OrderForm").EndCurrentEdit()
            Ds.AcceptChanges()
            Da.Update(Dt)

            MsgBox("Order added successfully !", MsgBoxStyle.Information)

        Catch ex As Exception
            MsgBox(ex.Message, MsgBoxStyle.Critical)
        End Try
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [Acces2010] اريد تعديل الكود للاكسس بسام محمدغانم 0 833 13-10-21, 09:14 PM
آخر رد: بسام محمدغانم
  [Acces2010] ارجوكم ما هو الخطا فى الكود ؟ abomosaab alagan 1 1,110 16-09-20, 01:25 AM
آخر رد: معاند الحظ
  انشاء قاعدة بيانات SQL مع الجداول بواسط الكود aiman 1 3,943 26-12-19, 03:30 PM
آخر رد: osamaalymaghraby
  [SQL] هل ممكن المساعده في هذا الكود php mysql fadisat 0 1,428 07-08-19, 11:30 PM
آخر رد: fadisat
  أضافة زر إلى الفورم بواسطة الكود djelloul 1 1,871 02-05-19, 01:55 PM
آخر رد: PalmTree
  [سؤال] ما هو الخطأ فى هذا الكود احمد عبد الحكيم 1 1,893 07-07-17, 01:12 AM
آخر رد: silverlight
  طلب مساعدة لكتابة الكود بشكل صحيح moftah70 1 2,024 12-07-16, 07:52 PM
آخر رد: aliday03
  [سؤال] كيف افتح الاتصال باستخدام هذا الكود سعود 2 2,681 12-07-16, 06:23 PM
آخر رد: aliday03
  اريد استبدال الكود المرفق بكود ابسط على ان يعطي نفس النتيجة ledoledo 1 1,997 02-02-16, 07:07 PM
آخر رد: ledoledo
  [VB.NET] عرض الكود بار djelloul 2 2,100 15-01-16, 11:39 PM
آخر رد: djelloul

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


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