Dcount Help

[bleep-blop]

Hi,

Trying to get a Dcount to work. My code so far (not working)

DCount("OracleID", "TblEmpAb", "(OracleID = '" & txtOracleID & "'" & " AND AbStart =#" & Me.txtAbStart & "#")

Im using this VBA to prevent a new absence case being created if the employee selected already has a case open.

OracleID is a string
Abstart is a date

Been running round in circles.

Any help would be appreciated.

 

[bob fitz]

You say it does not work. Can you more specific.
Try:

DCount("OracleID", "TblEmpAb", "(OracleID = '" & txtOracleID & "' AND AbStart =#" & Me.txtAbStart & "#")

 

[pr2-eugin]

Hello bleep-blop, Welcome to AWF.

I think the problem you are facing would be the International Access Date problem, try formatting the Date entry..

DCount("OracleID", "TblEmpAb", "OracleID = '" & txtOracleID & "' AND AbStart = #" & Format(Me.txtAbStart, "mm\/dd\/yyyy") & "#")

Also you had an Opening parentheses before OracleID, and but did not close it.

 

[DavidAtWork]

try

DCount("OracleID", "TblEmpAb", "[OracleID] = '" & txtOracleID & "' AND [AbStart] = #" & Me.txtAbStart & "#")

 

[bleep-blop]

Thanks for all the responses. It was counting 0 when I knew the criteria should count 5.

PR2-eugin your code worked straight away.

Thanks all

 

[pr2-eugin]

Glad to help. Good Luck.

 

[NigelShaw]

Hi

Couldn't you simply create a report to check for open cases? You could challenge that query with a VBA record set and fine tune it quite easily.

Nigel