[mhareek]

السلام عليكم و رحمة الله
اساتذتى الكرام   
اريد كل مرة عند ترحيل البينات  خانة id تزيد واحد بغض النظر عن المخذوف وغيرة  
انا عملت هذا الكود    ولكنه لا يعمل        
انا قصدت ان كل مرة يرى اكبر رقم ويزيد علية واحد

كود :

add.Refresh
add.Recordset.AddNew
 add.Recordset.Fields!ID = add.Recordset(Max(ID) + 1
add.Recordset.Fields!cv = Text8.Text
add.Recordset.Fields!oName = text6.Text
add.Recordset.Fields!rmz = Text5.Text
add.Recordset.Fields!date1 = Text4.Text
add.Recordset.Fields!am = Text3.Text
add.Recordset.Fields!sal = Text2.Text
add.Recordset.Fields!bay = Text1.Text
add.Recordset.Fields!com = Text7.Text
add.Recordset.Update

  ارجو المساعد والتعديل على الكود    جزاكم الله خير