I have a function; EditPost(rst, itm)
that "synchronizes" all the edits to a database.
It takes two parameters:
rst is a DAO recordset (Access database) and
itm is the open Contact item
Inside that function I use this code inside a
With rst - End With construct:
If itm.LastModificationTime <> "" And _ itm.LastModificationTime <>
#1/1/4501# Then _
And itm.LastModificationTime <> None Then
.LastUpdated = itm.LastModificationTime
'.LastUpdated = Now 'I tried this as well...
Else
.LastUpdated = Null
End If
If I try to assign another date value to .LastUpdated it works, but I
can't get it to work from this field.
Is it the wrong Date format or what?
Grateful for any help,
Kristian
*** Sent via Developersdex
http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!