If statement

[cbende2]

I have a date field that I would like to be updated to =Now() but only for new records.



My guess is that I will need an if statement in the OnClick event in properties of that field.

I tried making an if statement but was unsuccessful. Any help would be great!

Thank you all!

[June7]

Could set DefaultValue property to: Now()

No code required.

[ssanfu]

In the table design mode, select the date field.
In the "DEFAULT VALUE" property row, enter =Now() .

Now, anytime a NEW record is created, the current date and time will be automagically entered.

[cbende2]

Sorry, It doesn't have to be a new field, I only want it to update OnClick to =Now() if and only if the record doesn't have a date already in it.

EDIT: ssanfu, I just noticed your typo, and it had me laughing..

[June7]

I don't think Steve did a typo, but was intentional word play.

DefaultValue won't do anything to existing records.

You want to set value of existing records? Could do this in one pass with an UPDATE sql action.

Otherwise:

If IsNull(Me!fieldname) Then Me!fieldname = Now()

[ssanfu]

Sometimes when you are programming on the confuser, things automagically happen. It does what I tell it to do, not what I want it to do.

I only want it to update OnClick to =Now() if and only if the record doesn't have a date already in it.

If IsNull(Me.Date_Control_Name) then
  Me.Date_Control_Name = Now()
End if

I used "Me.Date_Control_Name".... hopefully you took the time to rename the control. Access has the bad habit of naming a control the same name as the bound field. This can confuse Access.

I always take the time to rename the control so I (and Access) don't (doesn't??) get confused.


Or maybe

If Not Isdate(Me.Date_Control_Name) then
  Me.Date_Control_Name = Now()
End if

[cbende2]

Thanks June7, That last statement is working for me.

Thanks for your input as well ssanfu!

EDIT: Thanks for marking it solved also :P I have that in my sig, yet I'm not even living up to it... it's a shame.