---
title: "forumkod, klickbara länkar"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/81205-forumkod-klickbara-länkar"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Eclipse"
published: "2003-07-03T12:24:29.000Z"
updated: "2003-07-03T12:44:03.000Z"
replies: 1
views: 344
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/81205-forumkod-klickbara-länkar"
---

# forumkod, klickbara länkar

## #1 — Eclipse, 2003-07-03T12:24Z

Jag har sökt på "forumkod" men inte hittat det jag söker.

Jag hittade och läste Vides fina artikel i ämnet [här](http://www.webeye.nu/default2.asp?que=asp/default.asp&exec=asp/artiklar/asp_11.asp) men där framgick inte med glasklar tydlighet hur man gör för att få en länk klickbar på en nyhetssida.

Förstår ni frågan?

Permalänk: https://www.webforum.nu/p/81205

## #2 — ekke_t, 2003-07-03T12:44Z

Denna kod använder jag... har hittat den nånstans... vet inte exakt hur den funkar... men funkar gör den :)

```
Function convertLink(ByVal strText)
Dim mDelimit
Dim re
mDelimit = Chr(0)
Set re = New RegExp
re.Global = True
re.IgnoreCase = true

re.Pattern = "(\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+)"
strText = re.Replace(strText, "<a href=""mailto" & mDelimit & ":$1"">$1</a>")

re.Pattern = "([url]http://[/url]|[url]https://[/url]|[url]ftp://[/url]|mailto:)(\S)(\S+)"
strText = re.Replace(strText, "<a href=""$1$2" & mDelimit & "$3"" target=""_blank"">$2" & mDelimit & "$3</a>")

re.Pattern = "(www\.(\S)(\S+))"
strText = re.Replace(strText, "<a href=""http://$1"" target=""_blank"">$1</a>")
strText = Replace(strText, mDelimit, "")

convertLink=strText

End Function
```

Sen anropas den med

```
response.write convertLink(rs("text"))
```

eller motsvarande

Permalänk: https://www.webforum.nu/p/1100292

---

Tråden på webben: https://www.webforum.nu/amne/asp/81205-forumkod-klickbara-länkar