webForumDet fria alternativet
Logga in / Bli medlem

replace [quote]

ASP

2 svar · 174 visningar · startad av origon

Medlem sedan okt. 2001101 inlägg
Trådstart#1

Jag har nu gjort så att om användaren skriver in

så blir texten kursiv och lägger in en linje, skriver han

så tar han bort kursiven och lägger till en linje.

Hur gör jag nu om jag vill att det inte ska gå att bara lägga in

och inte avsluta med

?

tmp = replace (tmp, "[quote]", "<BR><i>Quote<BR><img src=""/pic/gray_dot.gif"" width=""90%"" height=""1""><BR> ")
tmp = replace (tmp, "[/citat]", "<BR></i><img src=""/pic/gray_dot.gif"" width=""90%"" height=""1""><BR> ")
Medlem sedan dec. 200012 464 inlägg
#2

Lite regexp

set o = new regexp
o.pattern = ".*\[quote\].*\[/quote\]"
o.IgnoreCase = True   
if o.test(tmp) then
tmp = replace (tmp, "[quote]", "<BR><i>Quote<BR><img src=""/pic/gray_dot.gif"" width=""90%"" height=""1""><BR> ")
tmp = replace (tmp, "[/citat]", "<BR></i><img src=""/pic/gray_dot.gif"" width=""90%"" height=""1""><BR> ")
end if
Medlem sedan okt. 2001101 inlägg
#3

Tackar Lars, fungerar perfekt :)

Nu slipper jag fråga hur man gör så att den inte är CaseSensitive ;)

252 ms totalt · 4 externa anrop · v20260731065814-full.51f67c91
125 ms — deklarationer (db)
0 ms — hämta statistik (cache)
123 ms — hämta tråd, inlägg och bilagor (db)
126 ms — ändringar (db)