PDA

View Full Version : حذف رکوردها بصورت خودکار


Ali_Fallah
چهارشنبه 02 اسفند 1385, 11:05 صبح
آیا میشه کدی نوشت که فقط در یک جدول از 10 رکورد (یاتعداد دلخواه) بیشتر ثبت نشه و به مجرد ثبت رکورد 11 ، رکورد اولی خود بخود حذف بشه.
اَرژنگ
چهارشنبه 02 اسفند 1385, 11:19 صبح
آیا میشه کدی نوشت که فقط در یک جدول از 10 رکورد (یاتعداد دلخواه) بیشتر ثبت نشه و به مجرد ثبت رکورد 11 ، رکورد اولی خود بخود حذف بشه.

بله و جوابش را هم خودتان در سوالتان دادید.
smderfan
چهارشنبه 02 اسفند 1385, 12:24 عصر
سلام دوست عزیز
این هم نمونه ..... حتما مشکلت حل می شه ....
انگوران
چهارشنبه 02 اسفند 1385, 13:07 عصر
من تو رویداد exit آخرین فیلد کد زیر رو نوشتم .

Dim x As Integer
x = Me.Recordset.RecordCount
If x > 10 Then
DoCmd.GoToRecord , , acFirst
DoCmd.RunCommand acCmdDeleteRecord
DoCmd.GoToRecord , , acNewRec
End If