replace [quote]

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> ")

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

------------------
essentitia preter non sans multiplicandum

Tackar Lars, fungerar perfekt :)

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