Vill ta bort alla <br> eller vbCrLf i början och slutet på en text... är det möjligt?

Hejsan!

Den här funktionen kanske kan hjälpa dig...

<code>
Function RemoveNL(m_strString)

Set objRE = New RegExp
objRE.Global = True
objRE.IgnoreCase = True

strPattern = "(\<br\>|\n|\r)*"

objRE.Pattern = "^" & strPattern
m_strString = objRE.Replace(m_strString, "")

objRE.Pattern = strPattern & "$"
m_strString = objRE.Replace(m_strString, "")

Set objRE = Nothing

RemoveNL = m_strString
End Function
</code>

Den tar alltså bort inledande och avslutande vbCr, vbLf och <br> i en text.

Exempel:
www.tomsvensson.com/labb/84477.asp

Lycka till och lev väl,
Tom S.

Är de inte bara att :

<code>
string = Replace(Replace(String, "<br>",""),vbcrlf,"")
</code>

?

Tomsve: Tack

Daniel: ditt exempel tar väl bort alla <br>?