Kode til at lave www om til links

Hej eksperter....


jeg har fået dette stykke kode af pfp:

<%
Function LinkString(strInput)
        arrPattern = Array("([\w\._-]+@[\w\._-]+\.[A-Za-z]{2,4}\S*)", _
        "(http|https|ftp)(:\/\/[\w\._-]+\.[\w\._-]+\S*)", _
        "(^|[^\/])(www[^\.\s]?\.[\w\._-]+\.[A-Za-z]{2,4}\S*)")

        arrReplaceString = Array(" <a href='mailto:$1'>$1</a> ", _
        " <a href='$1$2' target='_blank'>$1$2</a> ", _
        " <a href='http://$2' target='_blank'>$2</a> ")

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

        For intIndex = 0 To UBound(arrPattern)
            Rx.Pattern = arrPattern(intIndex)
            strInput = Rx.Replace(strInput, arrReplaceString(intIndex))
        Next
       
        Set Rx = Nothing

        LinkString = strInput
    End Function
%>

det skulle gøre så den alle url's jeg hentede fra en db, blev til links, men kan ikke hitte ud af hvorfor de ikke gør det ?


nogen der kan hjælpe ??