Easy one, If then ElseIf

[Bruce]

Access-2003. I've created a simple trouble ticket feature to an existing DB. I have a form tied to a query that returns results and displays the current record. I have a combo-box named "Status" that has 3 possible values; Open, Restored, Closed. I've got two other fields on the same form that record the "restore date and close date". I'm using VB on the status box to try and set the restore or close date automatically. Not working with my code. I've tried: After update trigger:



If Me. Status = "restored" Then Me.restore_date = Date()
ElseIf Me.Status = "closed" Then Me.close_date = Date()
End If

also tried

If (Status = "restored") Then (restore_date = "Date()") etc...

nutin workin

Can someone provide this simple code for me? Thanks!

[pbaldy]

Is that space really in the first line before Status? If not, how does it work if you don't mix formats:

If Me.Status = "restored" Then 
  Me.restore_date = Date()
ElseIf Me.Status = "closed" Then 
  Me.close_date = Date()
End If

[Bruce]

Oops, the space was a typo. Thanks, the code worked but I would like to get both date and time. The table field value is set for General Date which includes date/time but I guess VB will only provide the date unless I specify the formatting in VB. I tried to use = DateTime but it didn't do date or time. Can you tell me how to get both date and time? Thanks again!

[Bruce]

Never mind. instead of using Date(), I used Now() and got both date & time.

[pbaldy]

Happy to help!