HI AGAIN,

1) I HAVE A TEXT BOX AND I'D LIKE TO TAKE VALUE OF THE DATE
E.G. 25/04/2008 TO 20080425 (YEARMONTHDAY)
2) WHEN I TAKE THE VALUE FOR EVERY ROW I WANT TO TAKE A NUMBER BESIDE AUTOMATIC
E.G. 200804251, FOR THE FIRST ROW
     200804252, FOR THE SECOND ROW
     200804253, ..................

For item 1, I would have a date field and keep the date in it in the proper format, then I would have a text field that you take from the date field like this:

Dim sDate As String
Dim dtDate As Date

dtDate = Me.DateField

sDate = DatePart("yyyy", dtDate) & DatePart("mm", dtDate) & DatePart("d", dtDate)

Me.StringDateField = sDate

For the second item, store the string date, and then add another column that is a number value, and just take the Max of the number culumn where Date = sDate and add 1.

Did that help?

mmcdonal

Look it up at: http://wrox.books24x7.com

THANX A LOT THATS IT