error with a code

[ashraf_al_ani]

Dear all
I am using access front end and sql server back end (access project)

this code

1. Me.INV_DATE =Date
2. Previous_Date=DCount("*","Invoice","[INV_Date]=#"&Me.INV_DATE &"#")
3. IfPrevious_Date=0Then
4. Me.NUM1 = 1
5. Else
6. 'existing in the table
7. Me.NUM1 =DMax("[NUM1]","INVOICE","[INV_Date]=#"&Me.INV_DATE &"#")+1
8. EndIf

this code runs ok in access .mdb
but when i take it in access form in access project .adp

error appears in

in this statement

1. Previous_Date=DCount("*","Invoice","[INV_Date]=#"&Me.INV_DATE &"#")

please any idea

best regards

[June7]

What is the exact error message?

[ashraf_al_ani]

run-time error '-2147217855(80040e-41)':
command contained one or more errors

this is the error message
pls any ideas
best regards

[June7]

Your code is missing some spaces, words are running together. Is that just poor typing in post? Why don't you copy/paste the code from the VBA window to the post?

I have never used adp. No idea why the code would fail. That error message is not very informative.

Bing: domain aggregate in adp
http://www.tech-archive.net/Archive/.../msg00170.html

Apparently others have experienced this issue.