---
title: "Replace krånglar!"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/127907-replace-krånglar"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "webbSAJTEN"
published: "2005-05-09T18:31:04.000Z"
updated: "2005-05-09T18:57:13.000Z"
replies: 2
views: 215
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/127907-replace-krånglar"
---

# Replace krånglar!

## #1 — webbSAJTEN, 2005-05-09T18:31Z

Tjenare!

```
     <% 
Function byt(strTexten) 
strTexten = Replace(server.HTMLEncode(strTexten),vbCrlf,"<br>")
Set objRegExp = New regexp
objRegExp.Global = true
objRegExp.IgnoreCase = true
		
strTexten = Replace(strTexten,"[b]","<b>")
strTexten = Replace(strTexten,"[/b]","</b>") 
strTexten = Replace(strTexten,"[i]","<i>")
strTexten = Replace(strTexten,"[/i]","</i>") 
strTexten = Replace(strTexten,"[u]","<u>") 
strTexten = Replace(strTexten,"[/u]","</u>") 
strTexten = Replace(strTexten,"[c]","<center>") 
strTexten = Replace(strTexten,"[/]","</center>")
		
byt = strTexten 
End Function 
%>
```

Denna kod har jag på sidan..
I databasen har jag olika rubriker, bland annat:

\[ b \]Teori\[ /b \] &\[ i \]Teori\[ /i \] (utan mellanslag)

Det blir kursivt på den ena, men det blir ingen skillnad på den som ska bli fet.

Vad är felet??

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

## #2 — Jesper T, 2005-05-09T18:55Z

Du behöver inte blanda in regexp. Du kan byta ut måsvingarna till \[\] om du vill.

```
Function byt(strTexten) 
	strTexten = Replace(server.HTMLEncode(strTexten),vbCrlf,"<br>")
	strTexten = Replace(strTexten,"{b}","<b>")
	strTexten = Replace(strTexten,"{/b}","</b>") 
	strTexten = Replace(strTexten,"{i}","<i>")
	strTexten = Replace(strTexten,"{/i}","</i>") 
	strTexten = Replace(strTexten,"{u}","<u>") 
	strTexten = Replace(strTexten,"{/u}","</u>") 
	strTexten = Replace(strTexten,"{c}","<center>") 
	strTexten = Replace(strTexten,"{/c}","</center>")
	byt = strTexten 
End Function
```

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

## #3 — webbSAJTEN, 2005-05-09T18:57Z

Jag fixade de genom att tanka upp filen genom windows ftpfunktion :P
Körde allt genom DW först..

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/127907-replace-krånglar