Soweit Zahlen im Spiel sind ist es ok - funktioniert.
Wenn ich aber
<font style=" LEFT: 0pt; POSITION: relative; FONT-SIZE: 10pt;" FACE="TEXAS"
COLOR="#FF0000"><b><i><b><i>Siemens</i></b></i></b></font>
Habe und das gerne ersetzen möchte,
ReplaceStyle(content, "FACE=[^a-zA-Z]*", "FACE=""Arial""")
dann kommt sowas raus
<font style=" LEFT: 0pt; POSITION: relative; FONT-SIZE: 10pt;"
FACE="Arial"TEXAS" COLOR="#FF0000"><b><i><b><i>Siemens</i></b></i></b></font>
Die Ersetzungsroutine:
Function ReplaceStyle(ByVal oldStr As String, ByVal patrn As String, ByVal
replStr As String) As String
Dim regEx As System.Text.RegularExpressions.Regex
regEx = New System.Text.RegularExpressions.Regex(patrn)
Return regEx.Replace(oldStr, replStr)
End Function
Irgendwie hängt sich alles an den Pattern Properties auf.
Hat einer einen Rat?
Danke
Rene
_______________________________________________
Coffeehouse Mailingliste, Postings senden an:
[email protected]
An-/Abmeldung und Suchfunktion unter:
http://www.glengamoi.com/mailman/listinfo/coffeehouse