AutoFillNewRecord

[Sausagefingers]

Hi,
I'm looking at using the 'AutoFillNewRecord' sample to input a previous date into a new record. I am using the Calendar control to pick the 'date of transaction' (which may be anything up to a week prior to the current date).

The date picked may have to be input for a full 180+ recordset so I would like to have the database input the same date every new record.

Anyhow, the sample I am looking at is (as far as I can see) a sample to input string fields, not date and time.

Not being a VBA wiz, Im not sure where/how to change the code so that the value accepted is date and time as opposed to string?

Can anyone point me in the right direction?

Snippets follow:
'Dim FillFields As String, FillAllFields As Integer....'
'If FillALLFields Or InStr(FillFields, ";" & (C.Name) & ";") > 0 Then...'

Sample: http://support.microsoft.com/kb/210236

TIA Sausagefingers

 

[Bat17]

for what you want just sticking something like

Me.MyDateField.DefaultValue = Me.MyDateField

in the afterupdate event of the date field should do what you want.

Peter