Rendere un URL clickabile con A HREF

[KONEY23]

Salve.

Ho un testo in un DB che stampo a video con un response.write. Quel che vorrei fare e' che se in questo testo c'e' un URL questo venga linktato con un normale A HREF. Esiste una qualche funzione gia' pronta per ottenere questo?

[Mems]

function urlMe(theText)
if len(theText) > 0 then
  elText = split(theText," ")
    for i = 0 to uBound(elText)
      if left(elText(i),7) = "http://" then
        response.write "" & elText(i) & " "
      elseIf left(elText(i),4) = "www." then
        response.write "" & elText(i) & " "
      else
        response.write elText(i) & " "
      end if
    next
end if
end function

testo = "ciao questo è il sito di www.htm.it e questo è il http://forum.html.it"
call urlMe(testo)

[KONEY23]

Funziona benissimo, grazie!