Date Insertion Command Button Query

[Rick4077]

This code (query) is run via a command button on a form.

I'm looking for a way to allow the user to insert a date, ie., 2006-08 into all three date fields at one time as they will always use the same date;

LISTDATE
PENDINGDATE
CLOSEDDATE

Thanks . . . Rick

SELECT OCDownloadRES.CITY, 

Count(OCDownloadRES.LISTDATE) AS [Sum ofLISTDATE], 
Count(OCDownloadRES.PENDINGDATE) AS [Sum of PENDINGDATE], Count(OCDownloadRES.CLOSEDDATE) AS [Sum of CLOSEDDATE]

FROM OCDownloadRES
GROUP BY OCDownloadRES.CITY, OCDownloadRES.PROPSUBTYPE
HAVING (((OCDownloadRES.PROPSUBTYPE)=[ENTER PROP TYPE]));

 

[ajking]

Hi Rick

This might be simplistic but try using the afterupdate action:

Private Sub Listdate_AfterUpdate()
Me.PendingDate.Value = Me.Listdate
Me.CloseDate.Value = Me.Listdate

End Sub

Alan

'Life is what happens to you while you are busy making other plans' John W. Lennon 1940-1980

 

[Rick4077]

Hi Alan . . . thanks, I'll try that and see how it works.

Rick