---
title: "Problem med RegExp!"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/44023-problem-med-regexp"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Mika3l"
published: "2002-05-18T09:18:33.000Z"
updated: "2002-05-18T09:32:42.000Z"
replies: 4
views: 267
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/44023-problem-med-regexp"
---

# Problem med RegExp!

## #1 — Mika3l, 2002-05-18T09:18Z

Hejsan!
Jag får det här felmeddelandetmeddelandet:

Error Type:
Microsoft VBScript runtime (0x800A139A)
Unexpected quantifier

När jag använder den här koden(sparad som function.inc och inkluderas sedan på ett flertal sidor):

```
<%
Function fixa(str)
str = "" & str
str = Replace(str,  vbCrlf, "<br>" & vbCrlf)
str = Replace(str,"[1]","<font size=1>")
str = Replace(str,"[/1]","</font>")
str = Replace(str,"[2]","<font size=2>")
str = Replace(str,"[/2]","</font>")
str = Replace(str,"[3]","<font size=3>")
str = Replace(str,"[/3]","</font>")
str = Replace(str,"[4]","<font size=4>")
str = Replace(str,"[/4]","</font>")
str = Replace(str,"[5]","<font size=5>")
str = Replace(str,"[/5]","</font>")
str = Replace(str,"[6]","<font size=6>")
str = Replace(str,"[/6]","</font>")
str = Replace(str,"[fet]","<b>")
str = Replace(str,"[/fet]","</b>")
str = Replace(str,"[u]","<u>")
str = Replace(str,"[/u]","</u>")
str = Replace(str,"[k]","<i>")
str = Replace(str,"[/k]","</i>")
str = Replace(str,"[verdana]","<font face=Verdana>")
str = Replace(str,"[/verdana]","</font>")
str = Replace(str,"[arial]","<font face=Arial>")
str = Replace(str,"[/arial]","</font>")
str = Replace(str,"[seriff]","<font face=MS Sans Seriff>")
str = Replace(str,"[/seriff]","</font>")
str = Replace(str,"[helvetica]","<font face=Helvetica>")
str = Replace(str,"[/helvetica]","</font>")
str = Replace(str,"[bild]","<img src=")
str = Replace(str,"[/bild]",">")
Set objRegExp = New regexp 
objRegExp.Global = true 
objRegExp.IgnoreCase = true
objRegExp.Pattern = "\[lank url=(""?)(.*?)\1\](.*?)\[\/lank\]" 
[blue]str = objRegExp.Replace(str,"<a href=""$2"" target=""_blank"">$3</a>")[/blue]
Set objRegExp = New regexp 
objRegExp.Global = true 
objRegExp.IgnoreCase = true
objRegExp.Pattern = "\[farg=(""?)(.*?)\1\](.*?)\[\/farg\]" 
fixa = objRegExp.Replace(str,"<font color=""$2"">$3</font>") 
End Function
%>
```

Raden det är fel på är blå.
Koden har fungerat finfint förut men nu har den helt plötsligt slutat att fungera. :o

Snälla hjälp!

/Mika3l

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

## #2 — @nders, 2002-05-18T09:25Z

Har det fungerat förut på den maskin du kör det nu?

Det luktar som att din scriptmotor äf för gammal.

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

## #3 — Mika3l, 2002-05-18T09:28Z

Sidan fungerar lokalt på min dator men när jag har sidan upplagd på hemsida.net så fungerar det inte.
Detta är mycket konstigt för det fungerade där förut under IIS4 men inte nu under IIS5.

Vart kan man ladda hem en scriptmotor?

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

## #4 — @nders, 2002-05-18T09:31Z

Det spelar inte så stor roll om du kör det på IIS4 eller IIS5, det fungerar inte om inte Script engine uppdateras.

<http://msdn.microsoft.com/downloads/default.asp?URL=/downloads/sample.asp?url=/msdn-files/027/001/733/msdncompositedoc.xml>

Mvh,

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

## #5 — Mika3l, 2002-05-18T09:32Z

Jag får väl ta och skicka dom ett mail!

Tack @! :)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/44023-problem-med-regexp