webForumDet fria alternativet
Logga in / Bli medlem

RegExp problem

ASP

0 svar · 134 visningar · startad av KoTTeN

Medlem sedan sep. 20011 722 inlägg
Trådstart#1

Hallå! Håller på å försöker lära mig lite RegExp. Har försökt att få länkar i form av www . adress . com, http:// www .adress .com och [länk](http:// adress .nu). Fast utan mellanslag förstås.
Har klippt å klistrat lite från vissa guider å fått fram den här koden:

 <% 
strText = "En länk: www. länk. com. å en till: http:// [url="http://www.gamestyle."]www.gamestyle.[/url]  nu eller varför inte: [URI=http:// www. gamestyle.nu]länk[/URI]"

Set objRegExp = New regexp
objRegExp.Global = true
objRegExp.IgnoreCase = true

objRegExp.Pattern = "(http://)(\S)(\S+)"
strText = objRegExp.Replace(strText, "<A HREF=""$1$2"">$2$3</A>")
objRegExp.IgnoreCase = True	
objRegExp.Global = True

objRegExp.Pattern = "(www\.(\S)(\S+))"
strText = objRegExp.Replace(strText, "<A HREF=""http://$1"">$1</A>")
strText = Replace(strText, mDelimit, "")
objRegExp.IgnoreCase = True	
objRegExp.Global = True

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

Response.write strText
%>

Men de blir vissa fel. Du kan se resultatet här.
Dom liksom skriver över varandra så blir allt skit.
Jag har kollat på Emissions kod men tyvärr fatta jag inte mycket av den.
Någon som vet hur man ska göra för att få det att fungera?

260 ms totalt · 4 externa anrop · v20260731065814-full.51f67c91
126 ms — deklarationer (db)
0 ms — hämta statistik (cache)
131 ms — hämta tråd, inlägg och bilagor (db)
126 ms — ändringar (db)