Nått konstigt med regexp!

10 svar · 582 visningar · startad av M.Cheraghi 1 feb. 2004

M.CheraghiMedlem sedan juli 20015 107 inlägg

Frågan1 feb. 2004 21:48#1

Yellow :)

Jag frågade för ett tag sedan angående RegExp här på WF hur man gör forumkod! och visst fungerade det då :)
I dags läget när jag försöker använda detta gamla script! så går det inte =/ jag får upp ett annorlunda medelande än vad jag sett förut! =( Rad 275 som är relevant är Fetmarkerad! Avmarkerar jag den med ' så kommer inget felmedelade, men då så gör inte regexp om till html heller

Error Type:
Microsoft VBScript runtime (0x800A139A)
Unexpected quantifier
/su/forum.asp, line 275

	  <%
Function ReplaceTags(strPattern, strReplace, strSource)
  Dim objRX
  Set objRX = New RegExp
  objRX.IgnoreCase = True
  objRX.Global = True
  objRX.Pattern = strPattern
  [b]ReplaceTags = objRX.Replace(strSource, strReplace)[/b]
End Function

strText = RSthread("ThreadMessage")
strText = Server.HTMLEncode(strText)
strText = ReplaceTags("\[B\](.*?)\[\/B\]", "<b>$1</b>", strText)
strText = ReplaceTags("\[I\](.*?)\[\/I\]", "<i>$1</i>", strText)
strText = ReplaceTags("\[U\](.*?)\[\/U\]", "<u>$1</u>", strText)
strText = ReplaceTags("\[IMG\](.*?)\[\/IMG\]", "<IMG SRC=""$1"" border=""0"">", strText)
strText = ReplaceTags("\[URL\](.*?)\[\/URL\]", "<a href=""$1"">$1</a>", strText)
strText = ReplaceTags("\[color=(.*?)\]([\s\S]*)\[/color\]", "<font color=""$1"">$2</font>", strText)
strText = replace(strText, vbCrLf , "<br>")

response.write strText
%>

NickemannenMedlem sedan aug. 20003 575 inlägg

1 feb. 2004 21:57#2

I vilket fall som helst så borde du ta bort raden
strText = Server.HTMLEncode(strText)

För den ändrar tecken på [] och \ tror jag.

M.CheraghiMedlem sedan juli 20015 107 inlägg

1 feb. 2004 22:04#3

Nickemannen skrev:

I vilket fall som helst så borde du ta bort raden
strText = Server.HTMLEncode(strText)

För den ändrar tecken på [] och \ tror jag.

Men tar jag bort den är det ingen vits att ha Forumkod då kan juhe folk skriva in HTML om dem vill! Koden har fungerat förut! iomed att jag kör HTML Encode innan jag gör om [] till <> borde inte dessa bli påverkade!

NickemannenMedlem sedan aug. 20003 575 inlägg

1 feb. 2004 22:29#4

Japp du hade rätt jag testade och [- tecknena blir oförändrade vid en Server.HTMLEncode()

Hmmm, är du 100% säker på att RSthread("ThreadMessage") innehåller något ?

För om jag testar att lägga in en sträng med [.IMG.]blaha[./IMG.]
Så fungerar det istället för RSthread("ThreadMessage").

OBS! utan punkter då ;)

M.CheraghiMedlem sedan juli 20015 107 inlägg

1 feb. 2004 22:34#5

Nickemannen skrev:

Japp du hade rätt jag testade och [- tecknena blir oförändrade vid en Server.HTMLEncode()

Hmmm, är du 100% säker på att RSthread("ThreadMessage") innehåller något ?

För om jag testar att lägga in en sträng med [.IMG.]blaha[./IMG.]
Så fungerar det istället för RSthread("ThreadMessage").

OBS! utan punkter då ;)

Jupp den innehåller något ;) För när jag avbockar den raden så hämtas värdet och skrivs ut. Utan att det blir ändrat av min Regexp! Men kan det vara något med rättigheterna för att få köra regexp? Kanske?

Mvh

JosefMedlem sedan mars 20023 561 inlägg

1 feb. 2004 22:37#6

Men prova att flytta

strText = Server.HTMLEncode(strText)

tills efter du har kört strText genom ReplaceTags...?

NickemannenMedlem sedan aug. 20003 575 inlägg

1 feb. 2004 22:39#7

Josef skrev:

Men prova att flytta
strText = Server.HTMLEncode(strText)
tills efter du har kört strText genom ReplaceTags...?

Men då fungerar ju inte <a href="", samt <img src="" :P.

Men testa att sätta in en annan texträng just där strText = RS(vad det nu var).

Och testa bara då ser du ju om det är rättigheter eller bara det att det inte Rs(vad det nu är) innehåller något.

M.CheraghiMedlem sedan juli 20015 107 inlägg

1 feb. 2004 22:39#8

Josef skrev:

Men prova att flytta
strText = Server.HTMLEncode(strText)
tills efter du har kört strText genom ReplaceTags...?

Fungerar inte det heller, klagar på samma rad som är fet, har testat att tom bocka av HTML Encode, men det är samma fel där också! :(

@ndersMedlem sedan juni 200032 967 inlägg

2 feb. 2004 05:20#9

Unexpected quantifier brukar betyda att din scriptmotor är för gammal. Hämta ny från Microsoft.

Minst version 5.5 krävs för att RegExp ska funka hyggligt.

Mvh

Engine^Medlem sedan dec. 20003 887 inlägg

2 feb. 2004 08:42#10

Unexpected quantifier betyder att något i ditt pattern inte gick att tolka.

Enklaste lösningen kan nog vara den @nders föreslår. Den svårare lösningen är att du tar och studerar in dig på Regular Expressions... ;)

M.CheraghiMedlem sedan juli 20015 107 inlägg

2 feb. 2004 09:18#11

Det var tydligen Script motorn.. jag har uppgraderat till version 5,6 nu och det fungerar normalt igen! mycket att hålla reda på när man formaterar! :OO
Skriptmotor, rättigheter osv osv :)

Tack för hjälpen Lurven, och alla som var vänliga och gav förslag :)