Not Like Error

[ria4life]

Need some help with this command...Access VBA gives me an error on this: Compile Error...Expected Expression over the (Like) part of the command


elseif me.adjustmentfield Is Null OR Not Like "*[!0-9]*" then

MsgBox Prompt:="Only Whole Numbers Can be Entered...Try Again!", Buttons:=vbOKOnly, Title:="Quantity Invalid"

thanks in Advance

 

[Minty]

You need to add the test criteria in full each time;

elseif me.adjustmentfield Is Null OR [COLOR="Red"]me.adjustmentfield[/COLOR] Not Like "*[!0-9]*" then

MsgBox Prompt:="Only Whole Numbers Can be Entered...Try Again!", Buttons:=vbOKOnly, Title:="Quantity Invalid"

 

[ria4life]

Minty,

Tried it but i get the same error.Compile error on the same line:

elseif me.adjustmentfield Is Null OR me.adjustmentfield Not Like "*[!0-9]*" then

 

[Minty]

Well I missed a school boy error in my answer as well.

elseif  [COLOR="Red"]IsNull(me.adjustmentfield) [/COLOR]OR me.adjustmentfield Not Like "*[!0-9]*" then

MsgBox Prompt:="Only Whole Numbers Can be Entered...Try Again!", Buttons:=vbOKOnly, Title:="Quantity Invalid"

Can you check you are pasting the actual code as well as me. would always come out as Me. if the editor accepted the line.

 

[CJ_London]

in VBA this

OR me.adjustmentfield Not Like "*[!0-9]*"

needs to be

OR NOT (me.adjustmentfield Like "*[!0-9]*")

 

[ria4life]

Thanks Guys:

CJ London...your solution worked as expected.