These are normally replaced with <br>'s if you are displaying the text. Is this what you are trying to do? If so this does it for me:
Function DisplayMemo(theText)
DisplayMemo = ""
on error resume next
DisplayMemo = CStr(theText)
if (len(DisplayMemo) > 0) Then
DisplayMemo = Replace(DisplayMemo, vbCrLf, "<br>", 1, -1, 1)
end if
End Function
If not im sure you can alter the function to do what you want it to do.
Additionaly - I wrap this function when inserting to the DB:
Function StoreText(theText)
StoreText = ""
on error resume next
StoreText = CStr(theText)
if (len(StoreText) > 0) Then
StoreText = Replace(StoreText, """", """, 1, -1, 1)
StoreText = Replace(StoreText, "'", "''", 1, -1, 1)
StoreText = Replace(StoreText, vbCrLf, "<BR>", 1, -1, 1)
end if
End Function
Wind is your friend
Matt
www.elitemarquees.com.au