I have a string that splitted by *
(stars) and I want to merge all items and create a new string with max value.
How can get max value for new string?
Function MergeAccessArray()
f_AccessArray = "projects@dnProjectsPatterning=0|dnProjectsSendReport=1#workplans@dnWorkplansAdd=0|dnWorkplansGrouping=1*projects@dnProjectsPatterning=1|dnProjectsSendReport=3#workplans@dnWorkplansAdd=1|dnWorkplansGrouping=0*projects@dnProjectsPatterning=5|dnProjectsSendReport=1#workplans@dnWorkplansAdd=0|dnWorkplansGrouping=2"
arrAccessPack = Split(f_AccessArray, "*")
nArrString = ""
For i = 0 To UBound(arrAccessPack)
If i < UBound(arrAccessPack) Then strPipe = "|" Else strPipe = ""
arrParts = Split(arrAccessPack(i), "#")
nArrPartString = ""
For j = 0 To UBound(arrParts)
'If j < UBound(arrParts) Then iPipe = "|" Else iPipe = ""
nPart = Split(arrParts(j), "@")(1)
nArrPartString = nArrPartString & nPart & strPipe
Next
nArrString = nArrString & nArrPartString & strPipe
Next
nArrString = Replace(nArrString, "||", "|")
xArrString = Split(nArrString, "|")
For x = 0 To UBound(xArrString)
Next
MergeAccessArray = nArrString
End Function
I want this String:
arrNewParameters = "projects@dnProjectsPatterning=5|dnProjectsSendReport=3#workplans@dnWorkplansAdd=1|dnWorkplansGrouping=2"