how can I use a split command for that:


ampersand = InStr(1, InetAWS, "¦")
If ampersand <> 0 Then
LINES = Mid(InetAWS, 1, ampersand - 1) & vbCrLf & InetAWS & Mid(InetAWS, ampersand + 1, Len(InetAWS) - ampersand + 1)
End If

( Each ¦ in the variable inetAWS will be replace by <ENTER>)

but this ismy problem:

exemple:
before
1¦2¦3¦4
after
1
2¦3¦4

only the first symbol is replaced ..

How can I fix this bug ??