---
title: "RegExp [list][*]"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/50264-regexp-list"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Peeer"
published: "2002-08-14T07:43:22.000Z"
updated: "2002-08-16T15:36:45.000Z"
replies: 10
views: 278
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/50264-regexp-list"
---

# RegExp [list][*]

## #1 — Peeer, 2002-08-14T07:43Z

```
objRegExp.Pattern = "\[LIST\](.*?)\[\/LIST\]"
strText = objRegExp.Replace(strText,"<ul>$1</ul>")
objRegExp.Pattern = "\<ul\>(.*?)\[\*\](.*?)\<\/ul\>"
strText = objRegExp.Replace(strText,"<ul>$1<li>$2</ul>")
```

Hjälp! Som det är nu så blir endast den första  omvandlad till en punkt.

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

## #2 — LarsG, 2002-08-14T07:46Z

```
objRegExp.global = true
```

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

## #3 — Peeer, 2002-08-14T07:47Z

Använder jag redan!  :( 
mer tips?

hela koden:

```
Set objRegExp = New regexp 
objRegExp.Global = true 
objRegExp.IgnoreCase = true 
objRegExp.Pattern = "\[LIST\](.*?)\[\/LIST\]"
strText = objRegExp.Replace(strText,"<ul>$1</ul>")
objRegExp.Pattern = "\<ul\>(.*?)\[\*\](.*?)\<\/ul\>"
strText = objRegExp.Replace(strText,"<ul>$1<li>$2</ul>")
```

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

## #4 — Peeer, 2002-08-14T17:35Z

Nästan 10 timmar senare, fortfarande ingen som har svarat! :(

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

## #5 — voigtann1, 2002-08-14T18:09Z

Function encode(strText)

Set objRegExp = New regexp
objRegExp.Global = true
objRegExp.IgnoreCase = true
strText = Server.HTMLEncode(strText)

objRegExp.Pattern = "\\\[list\\\]((.\|\\n)+?)\\\[\\/list\\\]"
strText = objRegExp.Replace(strText,"\<ul\>$2\</ul\>")

objRegExp.Pattern = "\\\[\\\*\\\](.\*?)"
strText = objRegExp.Replace(strText,"\<LI\>$1\</LI\>")

End Function

Fungera fin fint hos mej..

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

## #6 — Peeer, 2002-08-14T18:23Z

Njae. Inte helt fin kan jag väl inte påstå. För det första så har du glömt en rad i koden (encode=strText), sen så blir resultatet inte som jag vill.
Allt som står mellan \[.LIST\] och \[/.LIST\] försvinner, det skrivs inte ut. 
Om det däremot står ex \[.LIST=a\] och \[/.LIST=a\] så blir det riktigt konstigt. Då skrivs \[.list=a\] ut medans ersätts med punkter. Har försökt visa hur det ser ut nedan.

\[.list=a\]
tjoh
dfg
dfsd
sdf
\[./list=a\]

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

## #7 — LarsG, 2002-08-14T18:33Z

Jo, problemet är ju att med ditt andra mönster så matchar du hela "\<ul\>  a  b \</ul\>" och inte enskilda " a"

Jag tror att du måste välja en annan ansats, kanske något åt detta håll

```
Set objRegExp = New regexp 
objRegExp.Global = true 
objRegExp.IgnoreCase = true 
objRegExp.Pattern = "\[LIST\].*?\[\/LIST\]"

set matches = objRegExp.execute
offset = 0
for each match in matches 
    str = "<ul>" & replace(match.value,"[*]","<li>") & "</ul>"
    strText = mid(strText,1,match.firstIndex-1+offset) & str & mid(strText,match.FirstIndex+match.length)
    offset = offset + match.length - len(str)
next
```

Helt otestat förstås.

Mer info om matches:

<http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/vtoriObjects.asp>

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

## #8 — Peeer, 2002-08-14T19:07Z

```
Function reg(strText)
Set objRegExp = New regexp 
objRegExp.Global = true 
objRegExp.IgnoreCase = true 
objRegExp.Pattern = "\[list\].*?\[\/list\]"

set matches = objRegExp.execute[b](strText)[/b]
offset = 0
for each match in matches 
    str = "<ul>" & replace(match.value,"[*]","<li>") & "</ul>"
    strText = mid(strText,1,match.firstIndex-1+offset) & str & mid(strText,match.FirstIndex+match.length)
    offset = offset + match.length - len(str)
next
reg=strText
End function
```

Har markerat det enda felet jag hittade (efter [läsningen](http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/vtoriObjects.asp)), men något är fel för nu skrivs hela strängen ut. Utan att något ändras.
Mer hjälp tack! :)

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

## #9 — Peeer, 2002-08-15T17:37Z

Det här går inte bra! Får det inte att funka.
Någon?? :(

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

## #10 — emission, 2002-08-16T10:57Z

```
objRegExp.Pattern = "\[LIST\](.*?)\[\/LIST\]"
for each match in objRegExp.execute(strText)
strText=replace(strText,match.value,"<ul>" & replace(match.submatches(0),"[*]","<li>") & "</ul>")
next
```

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

## #11 — Peeer, 2002-08-16T15:36Z

Suck. Får det inte att funka :( 

```
Function reg(strText)
Set objRegExp = New regexp 
objRegExp.Global = true 
objRegExp.IgnoreCase = true 
objRegExp.Pattern = "\[LIST\](.*?)\[\/LIST\]"

for each match in objRegExp.execute(strText)
strText=replace(strText,match.value,"<ul>" & replace(match.submatches(0),"[*]","<li>") & "</ul>")
next
reg=strText
End function
```

anropas genom \<%=reg(text(1))%\> ( *text(1)* är en del av en array)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/50264-regexp-list