بدء الترقيم بـ 1 بعد 100

[الراشيد]

السلام عليكم ورحمة الله
لدي جدول لحجز مواعيد يوجد به حقول كالتالي رقم الحجز والاسم والموعد اي تاريخ الحجز- كيف بالاماكان عندما يصل رقم الحجز الى 100  100 سجل تم تسجيلها ان يبد الحجز من جديد بالرقم 1 ولكم جزيل الشكر

[Ben.Ja]

ممكن تفاصيل أكثر؟ وما هو البرنامج الذي تعمل به؟
Mysql - Sqlite ...

[الراشيد]

البرنامج اخي الفاضل access

[Mustapha29]

كود :

procedure TForm1.Button1Click(Sender: TObject); var i:integer; begin i:=0; with adoTable1 do begin   First;   While Not EOF do   begin   edit;   Inc(i);    adotable1id.Value:=i;    if i=100 then    i:=0;    Next;   end; end; end;

[الراشيد]

جزاك الله خير اً يا اخي