Using OpenArgs

[Lissa]

Does anyone know if it possible to pass more than one variable using OpenArgs?

DoCmd.OpenForm "frmIncmngInpectLog", acNormal, , , acFormAdd, , Me.txtPackingSlip, Me.txtDateRecd, Me.cbPart

Is not working... ... unless I only use one argument.
I need to pass all variables....

Thanks

 

[boblarson]

You have to concatenate them and then parse them out on the other side.

 

[boblarson]

So, actually like:

DoCmd.OpenForm "frmIncmngInpectLog", acNormal, , , acFormAdd, , Me.txtPackingSlip & "," & Me.txtDateRecd & "," & Me.cbPart

And then in the Open event:

Dim varSplit As Variant

varSplit = Split(Me.OpenArgs,",")

Then you can use

varSplit(0) for the first one

varSplit(1) for the second

and

varSplit(2) for the third.

 

[Lissa]

Hi Bob -
Oh that is clever! Okay I will try that -- Thanks!!

 

[boblarson]

Actually, you might want to use the pipe symbol | for the delimiter instead of a comma as commas may appear in data (at least more likely than the pipe).

 

[Lissa]

Update: It worked perfectly with the comma delimeters
Thanks Bob!!!

 

[boblarson]

Glad to hear, glad we could help.