Konvertieren crlf ->

14/10/2007 - 00:36 von Günter Gerold | Report spam
Hallo NG,

von Access aus soll ein String an Outlook übergeben werden.
Leider werden die CRLF von Outlook nicht berücksichtigt.
Füge ich von Hand <br> anstatt CRLF ein dann klappts.
Wie kann ich CRLF in <br> konvertieren ?
 

Lesen sie die antworten

#1 Günter Gerold
14/10/2007 - 00:55 | Warnen spam
Habs jetzt so gemacht:

Function Str2Html(ByVal sName As String) As String
Dim iLength As Integer, i As Integer
Dim sTmp As String

sTmp = ""
iLength = Len(sName)
For i = 1 To iLength
If Mid(sName, i, 1) = Chr(10) Then
sTmp = sTmp & "<br>"
Else
sTmp = sTmp & Mid(sName, i, 1)
End If
Next i
Str2Html = sTmp
End Function

Ähnliche fragen