طلب تصحيح كود لرقم

[2003salah_salah]

تحية و بعد

فإني ألتمس منكم تصحيح كود بقاعدة البيانات المرفقة حيث أن رقم السجل الجديد لا يتغير تلقائيا

حيث ارغب  عند ادخال سجل جديد ان يتغير الرقم اليا الى الرقم الذي يليه دون ان يكوت خاصية الحقل رقم تتقائي

فاذا طان الرقم السابق 1 فعند الدخول لسجل جديد أجد ألرقم 2

النموذج  livrejournal

Option Compare Database
Private Sub Form_Current()
  If Me.NewRecord Then
    On Error Resume Next 'It should never occur, just to be sure...
    Me!N°.DefaultValue = Nz(DMax("[N°]", "livrejournal"), 0) + 1
  End If
End Sub

Database1.accdb

[ابوخليل]

المشكلة لديك في تسمية الحقل

عدل اسم الحقل  N°  في الجدول وايضا في النموذج الى Num  مثلا  ثم عدله ايضا في الكود

 

[2003salah_salah]

لم تحل المشكلة رغم تغيير اسم الحقل  الى Num

استاذ خليل

[Foksh]

تفضل اخي الكريم

 

Database1.accdb

[2003salah_salah]

هدا هو المطلوب شكرا استاذنا الفاضل