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

هل استطيع عمل هذا الكود
وذلك لترتيب تسلسل الجدول من 1 وحتى 10

   
كود :
       Dim mSQL As String = "UpDate  Data1 set ID = @ID , ONo = @ONo where ID = " & Text1.Text & ""
       Dim cmd As New OleDbCommand(mSQL, Con)
       Dim i As Integer = 0  
       Dim x As Integer = 0

       For i = 0 To  9
           x += 1
           cmd.Parameters.Add(New OleDbParameter("@ID", OleDbType.Numeric)).Value = x
           cmd.Parameters.Add(New OleDbParameter("@ONo", OleDbType.Numeric)).Value = x
       Next
       End If

       If Con.State = ConnectionState.Open Then Con.Close()
       Con.Open()
       cmd.ExecuteNonQuery()
       Con.Close()
اللهم صلي على نبينا محمد
الرد
تم الشكر بواسطة:
#2
(27-01-20, 04:39 AM)Mtaktak كتب : السلام عليكم ورحمة الله

هل استطيع عمل هذا الكود
وذلك لترتيب تسلسل الجدول من 1 وحتى 10

   
كود :
       Dim mSQL As String = "UpDate  Data1 set ID = @ID , ONo = @ONo where ID = " & Text1.Text & ""
       Dim cmd As New OleDbCommand(mSQL, Con)
       Dim i As Integer = 0  
       Dim x As Integer = 0

       For i = 0 To  9
           x += 1
           cmd.Parameters.Add(New OleDbParameter("@ID", OleDbType.Numeric)).Value = x
           cmd.Parameters.Add(New OleDbParameter("@ONo", OleDbType.Numeric)).Value = x
       Next
       End If

       If Con.State = ConnectionState.Open Then Con.Close()
       Con.Open()
       cmd.ExecuteNonQuery()
       Con.Close()

اجعل الحقل ترقيم تلقائي
الرد
تم الشكر بواسطة:
#3
شكرا على مرورك

لنفرض ان الحقل غير مرقم ترقيم تلقائي
مجرد حقل يحتوي على رقم ونريد ان نضع به ترقيم تسلسلي من 1 الى 10

هل استطيع استخدام طريقتي هذه؟
اللهم صلي على نبينا محمد
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] اضافة تسلسل تلقائي EMADSSS 7 721 09-11-19, 02:50 AM
آخر رد: EMADSSS

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


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