Fel i regular expressions

hjälp oss lite.. var får du för fel?

använd:
objRegExp.Pattern = "\http://)?(.*?)\1\](.*?)\[\/url\]"
mess = objRegExp.Replace(mess,"<a href=""http://$3"" target=""_blank"">$4</a>")

jag får inget fel alls :/
Det enda som händer är att rätt del av texten inte bli länkat.
och allt syns
typ:
text

då är adress]text länkat.
och man ser
fast de är INTE länkade!

Ingen som kan hjälpa?

har du gjort denna till en funktion och gjort så att texten ska konventeras med hjälp av din funktion?

konverteras?
alltså man ska skriva in beskrivning

sen när man kollar på sidan ska man bara se själva beskrivningen. och den ska vara länkad till adressen. :)

<%
Function encode(strText)

Set objRegExp = New regexp
objRegExp.Global = true
objRegExp.IgnoreCase = true
strText = Server.HTMLEncode(strText)

objRegExp.Pattern = "\((.|\s)*?)\[\/url\]"
strText = objRegExp.Replace(strText,"<a href=$1 target=_blank>$2</a>")

encode = strtext

End Function
%>

<%=encode("[u rl=blåbär]test[/u rl]")%> så?

Funkar inte för mig :/ blir ingen länk alls då

har du provat min kod?

yup, den funkade inte för mig.. :/

voigtann1 skrev:

<%
Function encode(mess)

Set objRegExp = New regexp
objRegExp.Global = true
objRegExp.IgnoreCase = true
strText = Server.HTMLEncode(mess)

objRegExp.Pattern = "\(.*?)\[\/url\]"
strText = objRegExp.Replace(strText,"<a href=$1 target=_blank>$2</a>")

encode = strtext
End Function
%>

<%=encode("[u rl=blåbär]test[/u rl]")%> så?

Du har skrivit fel på parametern till "Server.HTMLEncode". Jag har även gjort om RegExp, fick inte det förra som stog där att fungera så jag skrev som jag har gjort på mitt egna forum :)

/Viktor