Split

[sRockyHill]

Hi,

I have a memo field that has a value - ©1st Time User©©Special Need©©TFA©

I need to split the value to say

©1st Time User©
©Special Need©
©TFA©

Thank you

 

[ThatRickGuy]

public function SplitFunction(value as string) as string
  dim ReturnValue as string 
  dim sValues() as string = split(value, "©")
  dim sValue as string

  for each sValue in sValues
    ReturnValue &= "©" & sValue & "©" & controlchars.crlf
  next
  
  return ReturnValue
end function

Just one of many ways.

-Rick

----------------------

http://www.ringdev.com