date (1 Viewer)

[$lim]

i have a form and i am trying to have the date field retain the value that the user last put in. So when they go to the next record the previus date that they entered will be in there, so they don't have to keep re-entering it. As of right now i have it set that it puts in today's date automatically.

 

[scouser]

Date

If you want to set the fileds value to the current date make the default value of the field:

=Date()

Not sure if that is what you meant?
Phil.

 

[BLeslie88]

this?

Option Compare Database
Dim vUserDate as Date

sub txtDate_lostfocus()
vUserDate = txtDate.text
end sub

sub txtDate_gotfocus()
if isnull(txtDate) then ' incase they are moving around in form to not change dates
txtDate.text = vUserDate
end if
end sub

something like this would work.

 

[$lim]

I tried that and it still did not retain the last date entered for the new record.

 

[BLeslie88]

well.

Well only way this would not work, would be if application was closed or form closes and re-opens....?

If that is the case, we need to do something diferent.