[elgokr]

(18-09-18, 04:06 PM)DK-x كتب :

اشكرك اخي على سعة صدرك ما قصرت  
وطلب آخر اذا ممكن
كيف اجلب اخر ID من قاعدة البيانات هذه  

الشكر لله والحمد لله

اذا كنت تريد اخر ID للبيانات التى تم اضافتها يمكنك استخدام كلاً من

كود :

       Dim dt As New DataTable
       dt.Clear()
       Dim sql As String = "SELECT Count(ID) FROM Namemoadfen"
       da = New OleDbDataAdapter(sql, con)
       cm = New OleDbCommandBuilder(da)
       da.Fill(dt)
       MsgBox(dt.Rows(0)(0))

أو

كود :

       MsgBox(DataGridView1.Rows(DataGridView1.Rows.Count - 1).Cells(0).Value)

وده داخل فورم Master

واذا كنت تريد من خلال عند اتمام الاضافة

فقط اسفل 

كود :

cmd.ExecuteNonQuery()

التى بشاشة الاضافة

قم باضافة الاسطر التالي

كود :

               cmd.CommandText = "Select @@Identity"
               MsgBox(cmd.ExecuteScalar())

كل ما عليك استبدال MsgBox

بالادء المطلوب ظهور الرقم به

تحياتى لك

وتمنياتى لك التوفيق