---
title: "Kan inte skriva <a href= osv."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/148406-kan-inte-skriva-a-href-osv"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Trumpf"
published: "2006-06-26T10:09:04.000Z"
updated: "2006-06-27T12:14:39.000Z"
replies: 10
views: 552
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/148406-kan-inte-skriva-a-href-osv"
---

# Kan inte skriva <a href= osv.

## #1 — Trumpf, 2006-06-26T10:09Z

Hej,
Jag har ett script som jag använder för att skriva blogg osv.
Men i textruterna där jag skriver inlägg så kan jag inte skriva \<a href=""\>\</a\> osv. Eller \<img src=""\>. Vad beror det på?

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

## #2 — @nders, 2006-06-26T10:12Z

Det beror på.
På vilket sätt fungerar det inte? Felmeddelande?

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

## #3 — Trumpf, 2006-06-26T13:47Z

Det blir så här i texten:

\<a href="http://www.expressen.se"\>Expressen\</a\>

Jag vill ju att det ska bli en länk.

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

## #4 — K@llen, 2006-06-26T14:24Z

Utan att se koden kan vi bara gissa. Förmodligen körs htmlencode() eller liknande på texten innan den publiceras. ;)

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

## #5 — Trumpf, 2006-06-27T11:49Z

Detta är problem alltså:

Function fixbug(strText)
strText = Replace(strText,"'","''")
strText = Replace(strText,"\\","\\\\")
fixbug = strText
End Function

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

## #6 — @nders, 2006-06-27T11:51Z

Den funktionen påverkar inte strängar på det sätt du beskriver.
Du får titta mer / bättre efter i koden.

mvh

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

## #7 — Trumpf, 2006-06-27T12:04Z

Hitta det!
Kan jag bara ta bort detta eller måste jag ändra i den?

Function makeTags(ByVal text)

text = Replace(Server.HTMLEncode(text),vbCrlf,"\<br /\>")
text = Replace(text,"(t)", "&nbsp;&nbsp;&nbsp;&nbsp;")											
' text = Server.HTMLEncode(text)

						

Set regExp = New regexp
regExp.Global = true
regExp.IgnoreCase = true
												
RegExp.Pattern="\\(b\\)(.\*?)\\(/b\\)"
text = regExp.Replace(text,"\<b\>$1\</b\>")
												
regexp.pattern = "\\(i\\)(.\*?)\\(/i\\)"
text = regexp.replace(text,"\<i\>$1\</i\>")
												
regexp.pattern = "\\(u\\)(.\*?)\\(/u\\)"
text = regexp.replace(text,"\<u\>$1\</u\>")

										
regexp.pattern = "\\(center\\)(.\*?)\\(/center\\)"
text = regexp.replace(text,"\<center\>$1\</center\>")

Set RegExp = Nothing
makeTags = text
End Function

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

## #8 — @nders, 2006-06-27T12:06Z

Denna rad är iaf den som gör att html-koden visas som text:

```
text = Replace(Server.HTMLEncode(text),vbCrlf,"<br />")
```

Om det bara är du som skriver kan du lika gärna ta bort den, om du nu vill kunna använda html-kod.

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

## #9 — Trumpf, 2006-06-27T12:08Z

:) tack!

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

## #10 — @nders, 2006-06-27T12:09Z

Eller ännu bättre, för att behålla radbrytningarna: 

```
text = Replace(text,vbCrlf,"<br />")
```

edit: jag menar alltså att du skulle ersätta ovanstående rad med denna, dvs kasta bort server.htmlencode.

Sedan får du gärna använda funktionen "Acceptera som slutgiltigt svar" på rätt sätt, dvs acceptera det inlägget som innehåller lösningen. Det hjälper andra att finna lösningar på liknande problem, då dessa inlägg kan markeras vid sökning.

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

## #11 — Trumpf, 2006-06-27T12:14Z

Testar det!

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/148406-kan-inte-skriva-a-href-osv