automatisk link laver

ligesom her på eksperten

Gør Comp'en ikk selv det ? hvis du starter med http://www.eksperten.dk ? Altså HTTP:// foran...

okay, jeg fik vist ikke udtrykt mig klart nok :)
jeg har et debatforum.
Når folk poster feks: http://wwwblablah.dk bliver det vist som alm tekst....
...det er det som skal laves om...

okay misforstod spørgsmålet ;o)

Leder du efter det her ?
http://activedeveloper.dk/download/default.asp?mode=showdownload&id=43

Du skal havde en function som gør det her er lidt:

Vinder script på www.netkoders.dk af link laver:
http://www.netcoders.dk/sources.asp?mode=view_source&cat_id=9&id=859&tech_id=1

Runner ups:
http://www.netcoders.dk/sources.asp?mode=view_source&cat_id=9&id=860&tech_id=1

Her er den function jeg bruger..:


Function LinkString2(strInput)
Set objRegExpHTTP1 = New RegExp
Set objRegExpHTTP2 = New RegExp

objRegExpHTTP1.Pattern = "(http|ftp)(:\/\/[\w\._-]+\.[\w\._-]+\S*)"
objRegExpHTTP2.Pattern = "(^|[^\/])(www[^\.\s]?\.[\w\._-]+\.[A-Za-z]{2,3}[\w\S]*)"

objRegExpHTTP1.Global = True
objRegExpHTTP2.Global = True

objRegExpHTTP1.IgnoreCase = True
objRegExpHTTP2.IgnoreCase = True

strOutput = objRegExpHTTP1.Replace(strInput, " <a href='$1$2' target='_blank'>$1$2</a> ")
strOutput = objRegExpHTTP2.Replace(strOutput, " $1<a href='http://$2' target='_blank'>$2</a> ")

objRegExpHTTP2.Pattern = "(<br>|[,.)\]\}])('>)"
strOutput = objRegExpHTTP2.Replace(strOutput, "$2")
objRegExpHTTP2.Pattern = "(<br>|[,.)\]\}])(' target=)"
strOutput = objRegExpHTTP2.Replace(strOutput, "$2")
objRegExpHTTP2.Pattern = "(<br>|[,.)\]\}])(</a>)"
strOutput = objRegExpHTTP2.Replace(strOutput, "$2$1")

Set objRegExpHTTP2 = Nothing
set objRegExpHTTP1 = Nothing

LinkString2 = strOutput
End Function



Og den kaldes sådan her:

response.write linkString2 rs("kolonne_med_beskeden")

En søgning i ASP kategorien åp klikbart link:
http://www.eksperten.dk/find.phtml?words=klikbart+link&catid=3