How to Concatenate WHERE condition of OPENFORM MACRO or VBA?

[Mr Key]

Hi all!
I have a form named Form1, from there I can open another form named frmModules by using OPEN_FORM MACRO at OnClick Event of ComandButton as follows

 OpenForm
        Form Name:      frmModules
        View:           Datasheet
        WHERE CONDITION:="[ModID]=" & [ModuleID]
        Data Mode:      Edit 
        Window Mode:    Normal 
 

With this MACRO I can Open frmModules which shows the data equivalent to the one selected from Combobox ModuleID from Form1 WHERE Forms!Form1!ModuleID=Forms!frmModules!ModID
Question:
How can I CONCATENATE the WHERE CONDITIONS to include more Criteria?
Example OPEN frmModules WHERE
1. Forms!Form1!ModID=Forms!frmModules!ModuleID
2. Forms!Form1!CustomerID=Forms!frmModules!CustomerID
3. Forms!Form1!ProductsName=Forms!frmModules!Products Name
Please help!!!

[mshmyob]

I don't use macros bu try something like so

"[ModID]=" & [ModuleID] & " AND [CustomerID]=" & [CustomerID] & " AND [ProductsName]='" & [ProductsName] & "'"
 

cheers,

[Mr Key]

It could work in my db, how about this & "'" on the end of that lineCode? What does it stand for?
Is there any other alternative solution for this?

[mshmyob]

Just enclosing strings in quotes. I assume ProductsName is a string.

cheers,

[Mr Key]

It works only with two Variables like
[CustomerID]=" & [CustomerID] & " AND [ProductsName]='" & [ProductsName] & "'"
If you add the third one it Doesnt!
I wish I could have all three WHERE conditions!
Help again!!!

[mshmyob]

Doesn't work???

You have to give me more details than that.

Note: I assumed CustomerID was numeric - if it is text then you have to enclose that in quotes also.

cheers,

[Mr Key]

Thanks alot myshomb!
Finally it works!!
I just missed the Quotes between the field!
Thanks again!

[mshmyob]

You're welcome. Good luck with the rest of your project.

cheers,