Add the DoTrim function (included below) to your LotusScript code. Then, rather than calling the Fulltrim function, call the DoTrim function.
- Function DoTrim(txt As String) As String
Dim strReturn As String
txt = Fulltrim(txt)
strReturn = ""
For cntr = 1 To Len(txt)
t = Mid$(txt, cntr, 1)
If (Asc(t) <> 13) And (Asc(t) <> 10) Then '13=>CR, 11=>LF
strReturn = strReturn + t
End If
Next
Dotrim = strReturn
End Function
