---
title: "Regular Expressions - citering"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/110322-regular-expressions-citering"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "LeonL"
published: "2004-08-29T16:01:47.000Z"
updated: "2004-09-01T18:38:32.000Z"
replies: 7
views: 367
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/110322-regular-expressions-citering"
---

# Regular Expressions - citering

## #1 — LeonL, 2004-08-29T16:01Z

Vi håller på med ett enkelt forum just nu, och har stött på ett RegExp-problem. Vi vill så gärna använda oss utav en citeringsfunktion, ungefär som den här på wF. Det går bra att använda citat-taggar utanför varandra, men det går inte lika bra att nästla citat-taggar.

Koden ser just nu ut så här:

```
.Pattern = "\[citat\]((.|\s)*?)\[/citat\]"
strReturn = .Replace(strReturn, "<br /><br /><span style=""font-size: 10px"">Citat:</span><br /><div class=""code_area"">$1</div><br />")
```

Hur skall man göra för att både nästlade citat-taggar och fristående citat-taggar att fungera?

r\\ Jag har redan sökt efter relaterande trådar, men de jag fick upp hjälpte tyvärr inte.

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

## #2 — Sebbe, 2004-08-31T15:37Z

Löste det med funktionen 

```
Function Citat(str)
  Do Until InStr(str, "[ citat]") = 0 OR InStr(str, "[/citat]") = 0
    intStartPos = InStr(str, "[ citat]")
    intStopPos = InStr(str, "[/citat]")

    str = Replace(str, "[ citat]", "<br /><span style=""font-size: 10px"">Citat:</span><br /><div class=""code_area"">", 1, 1)
    str = Replace(str, "[/citat]", "</div><br />", 1, 1)
  Loop

  Citat = str
End Function
```

 istället. :)

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

## #3 — LeonL, 2004-08-31T15:57Z

Japp, och vem var det som "kom på" lösningen? ;) :e :bla

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

## #4 — WebbisNet, 2004-09-01T16:52Z

Hur använder man den funktionen?

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

## #5 — Sebbe, 2004-09-01T17:20Z

> **WebbisNet skrev:**
>
> Hur använder man den funktionen?

Precis som man använder vilken annan funktion som helst.

```
Response.Write(Citat("[ citat]hejsan...[/citat]"))
```

**/red** Kom på att de två översta raderna i funktionen blev onödiga efter att jag hade gjort om funktionen, så dem kan du ta bort om du vill. ;)

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

## #6 — WebbisNet, 2004-09-01T17:31Z

Får det inte att funka i den här textarean.....det ska vara när man svarar på ett PM i mitt community så ska den föregående texten skilja sig från den nya

Jag får

```
Slut på programsats förväntas.
/mail/reply.asp, line 38, column 34
PrintTextarea "txtMess", "(Citat("[citat] "&reply("message")&" [/citat]"))", standardInputWidth+485,standardInputHeight+200
---------------------------------^
```

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

## #7 — Sebbe, 2004-09-01T17:38Z

```
PrintTextarea "txtMess", Citat("[ citat]" & reply("message") & "[/citat]"), standardInputWidth+485,standardInputHeight+200
```

Tror jag nog ska fungera. :)

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

## #8 — WebbisNet, 2004-09-01T18:38Z

> **Sebbe skrev:**
>
> ```
> PrintTextarea "txtMess", Citat("[ citat]" & reply("message") & "[/citat]"), standardInputWidth+485,standardInputHeight+200
> ```
>
> Tror jag nog ska fungera. :)

funkar bättre.....ska bara försöka få koden att köras och inte visas i textarean :-)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/110322-regular-expressions-citering