What is wrong with this code?

[nkenney]

Hi!

I am attempting to pass 2 arguments into a form. They are separated with a ";".
I have the following code:


Private Sub Form_Load()

If Not IsNull(Me.OpenArgs) Then
' Get custid and tag from OpenArgs

Custid = Left(OpenArgs, InStr(OpenArgs, ";") - 1)

Tag = Right(OpenArgs, InStr(OpenArgs, ";") + 1)
End If
End Sub

What am I doing wrong?

[ChrisO]

Rather than the Right function try the Mid function.

[nkenney]

Thanks a bunch!