Add Datetime to Recordset

martinaccess · October 10th, 2004, 04:52 AM

Hello all,
I got difficulty to add current datetime in following recordset. I know it should not be Now() which works in non ADODB way. I believed it is a very difficult one so can you please me a help.

    Do Until rst1.EOF
        rst1.Fields("cutoff_dt").Value = Now()
        rst1.Update
        rst1.MoveNext
    Loop

Thanks and Best Regards,
martinaccess :D:D:D

joefawcett · October 10th, 2004, 05:46 AM

Personally I would use SQL:

Code:

Dim dt as date
dt = Now()
Dim sDate as string
sDate = Format(dt, <format here>)
"UPDATE tblWhatever Set cutoff_dt = #" & sDate & "#"

but your technique should work as long as the recordset is updateable.
What exactly is happening?

--

Joe

--

Joe (Co-author Beginning XML, 3rd edition)

martinaccess · October 10th, 2004, 07:30 AM

Joe,

Thanks very much. I have attempted again but this time to add one more line to requery the form again. It works now and I think it is the cause of problem.

Once again, thanks for your help.

Have a good day!
martin access:D:D:D