By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
426,107 Members | 1,284 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 426,107 IT Pros & Developers. It's quick & easy.

Update Date Field (for Mod Date)

P: 56
I would like to make my "MODDATE" field to be updated to the current date when user edit record by "Click on Save" button
Here is my code for the "Save" button:
Expand|Select|Wrap|Line Numbers
  1. Private sub Save Click()
  2. MsgBox "Record has been updated successfully!", vbInformation, "RECORD HAS BEEN UPDATED!"
  3.     Me.MODDATE.Value = Date
  4.     DoCmd.Close acForm, "frmReview", acSaveYes
  5. End Sub
  6.  
In the tblReview, I have a field call "MODDATE", and I set this field to have a default value =Now(). It works well when user enter new record, but not when user update existing record.
I also tried: me.MODDATE.Value=Now() and also me.MODDATE=Now(),
they all me error which completely stops my database application.

Can someone please help?
Thanks!
bluemoon
Feb 17 '09 #1
Share this Question
Share on Google+
4 Replies


Megalog
Expert 100+
P: 378
Interesting.. I use pretty much the same thing throughout my database, on the form's 'BeforeUpdate' event.

Expand|Select|Wrap|Line Numbers
  1. me.Modified.Value = format(Now(), "m/d/yyyy  h:mm:ss AM/PM")
In my table, the field is set as a Date/Time, with NO preset format or default value.
My only guess is that maybe you have a format set which is conflicting with what Now() is returning from your form? Or, your field is set as the wrong Data Type.. (text instead of Date/Time?)

Add some error handling to your save button event and see what it tells you.

-Edit: Just noticed this is in the wrong area, should be moved to the Answers section.
Feb 17 '09 #2

NeoPa
Expert Mod 15k+
P: 31,419
Bluemoon, You don't say in what way your code is failing. That would be useful.

The code there seems workable (assuming the MODDATE control is properly bound to the ModDate field in the underlying table).

PS. Use Date() for a simple date value, but Now() for a date value which includes the time element.
Feb 17 '09 #3

NeoPa
Expert Mod 15k+
P: 31,419
Megalog, I recommend losing the Format() part of your code. This converts the date value to a string, which then only needs to be converted back automatically by Access. This won't fail, it is simply unnecessary (performance won't be noticeably different).

PS. Thanks for the heads-up about the wrong section. A better method for that would be the site's Report facility (top right of each post - other than your own). This will trigger an email to inform someone of the problem. Appreciate your help anyway.
Feb 17 '09 #4

missinglinq
Expert 2.5K+
P: 3,532
A Couple of points:

First, of course, you don't really need a "Save" button in Access. Moving off of the record or closing the form will save the record.

Secondly

Close acForm, "frmReview", acSaveYes

isn't doing what you think! It's saving any changes made to the design of the form; it isn't saving the record.

And last, I wonder if NeoPa's statement

assuming the MODDATE control is properly bound to the ModDate field in the underlying table

has pinpointed the problem. You have a MODDATE field in your underlying table, but do you actually have a MODDATE control (textbox) on your form?

Linq ;0)>
Feb 18 '09 #5

Post your reply

Sign in to post your reply or Sign up for a free account.