Hi. Yes values must be unique for fields that have option text/ option value as when it references these fields it must use a 'Find By Value' function call. When you say 'only possible to return values for the first optionfield' are you referencing these as tokens in email events or where?

-Chad

No, just trying to send the values through to Paypal. If you have two items that are the same price it won't work. In my case I'm using a list of items in a radio button group. Perhaps it works with other setups like checkboxes or multiple discrete items.

So you can imagine the problem -- Let's say you want to sell T-shirts. Maybe they all cost the same, but you are offering different phrases on each as selected by the user when they select the radio button next to the line item. You can see where this would be a problem...

You might check other threads on there with the same issue. YOu should be able to use values that are VALUE01_19.99 and VALUE02_19.99. The code is setup so that for the calculation checkboxlist function at least, and maybe some others, it will remove the value. This works for VALUE01 thru VALUE20 for a total of 20 items currently. I just checked the code and this is also being called within the PayPAl URL.

Here is the function call so you can see what the module should be doing if you wanted the same price but with multiple items.

Public Function ReplaceValueText(ByVal strListItem As String) As String
If strListItem.IndexOf("VALUE") >= 0 Then
strListItem = Replace(strListItem, "VALUE_", "")
strListItem = Replace(strListItem, "VALUE01_", "")
strListItem = Replace(strListItem, "VALUE02_", "")
strListItem = Replace(strListItem, "VALUE03_", "")
strListItem = Replace(strListItem, "VALUE04_", "")
strListItem = Replace(strListItem, "VALUE05_", "")
strListItem = Replace(strListItem, "VALUE06_", "")
strListItem = Replace(strListItem, "VALUE07_", "")
strListItem = Replace(strListItem, "VALUE08_", "")
strListItem = Replace(strListItem, "VALUE09_", "")
strListItem = Replace(strListItem, "VALUE10_", "")
strListItem = Replace(strListItem, "VALUE11_", "")
strListItem = Replace(strListItem, "VALUE12_", "")
strListItem = Replace(strListItem, "VALUE13_", "")
strListItem = Replace(strListItem, "VALUE14_", "")
strListItem = Replace(strListItem, "VALUE15_", "")
strListItem = Replace(strListItem, "VALUE16_", "")
strListItem = Replace(strListItem, "VALUE17_", "")
strListItem = Replace(strListItem, "VALUE18_", "")
strListItem = Replace(strListItem, "VALUE19_", "")
strListItem = Replace(strListItem, "VALUE20_", "")
strListItem = Replace(strListItem, "VALUE21_", "")
End If
Return strListItem

End Function