ทำlinkจากwebboard รบกวนท่านผู้รู้ค่ะ อยากทราบ code ทำ link จาก webboard ของเรา ไป web อืน

unction aspTwitterAutolink(strHtml)
Dim objRegex,strReturn
set objRegex = new regexp
objRegex.Pattern = "(\b(?:(?:https?|ftp|file)://|www\.|ftp\.)(?:\([-A-Z0-9+&@#/%=~_|$?!:,.]*\)|[-A-Z0-9+&@#/%=~_|$?!:,.])*(?:\([-A-Z0-9+&@#/%=~_|$?!:,.]*\)|[A-Z0-9+&@#/%=~_|$]))"
objRegex.IgnoreCase = true
objRegex.Global = true
strReturn = objRegex.Replace(strHtml, "<a href=""$1"" rel = ""nofollow"" target = ""_blank"">$1</a>")
set objRegex = nothing
aspTwitterAutolink = strReturn
end function