link i mit tekst felt

Der skal du have en funktion med...
Prøv med følgende:
<%
Function LinkString(strInput)
Set objRegExpHTTP1 = New RegExp
objRegExpHTTP1.Global = True
objRegExpHTTP1.IgnoreCase = True
objRegExpHTTP1.Pattern = "(http|ftp|https)(:\/\/[\w]+)(.[\w]+)([\w\-\.,@?^=%&:/~\+#]*[\w\-\@?^=%&/~\+#])?"
strOutput = objRegExpHTTP1.Replace(strInput, "<a href=""$1$2$3$4"" title=""Besøg dette link"" target=""_blank"" style=""text-decoration: none""><font color=""ff0000"">$1$2$3$4</a><font color=""#000000"">")
objRegExpHTTP1.Pattern = "(^|[^\/])(www)(.[\w]+)([\w\-\.,@?^=%&:/~\+#]*[\w\-\@?^=%&/~\+#])?"
strOutput = objRegExpHTTP1.Replace(strOutput, " $1<a href=""http://$2$3$4"" title=""Besøg dette link"" target=""_blank"" style=""text-decoration: none""><font color=""#ff0000"">$2$3$4</a><font color=""#000000"">")
set objRegExpHTTP1 = Nothing
LinkString = strOutput
End Function
%>
<%=Replace(LinkString(rs("tekst")),vbcrlf,"<br>")%>
- Husk på at funktionen IKKE skal loopes med i dit database-output...

\Dan

smid et svar

OK - her et svar...

\Dan