Varför ändrade du om min kod jag gav dej?
Frågan#1
Jag har denna forumfunktion ovan, men om jag har en testkod mellan < och >-taggar och i samma meddelande kör med mina egna []-taggar så blir allt "HTMLEncodat", även []-taggarna som jag vill ska bli till HTML-taggar. Hur löser jag detta?
Jag har försökt att plocka ut allt mellan < och > och enbart köra HTMLEncode på det men jag fick ingen framgång.. Mycket tacksam för svar.
Koden:
<% Function forumCode(mess)
mess = Server.HTMLEncode(mess)
Set objRegExp = New regexp
objRegExp.Global = true
objRegExp.IgnoreCase = true
objRegExp.Pattern = "\[(b|/b|i|/i|u|/u)\]"
mess = objRegExp.Replace(mess,"<$1>")
objRegExp.Pattern = "\[citat\]"
mess = objRegExp.Replace(mess,"<span class=""citat"">Citat:<br><img src=""graphics/line.gif"" width=""500"" height=""11""><br>")
objRegExp.Pattern = "\[/citat\]"
mess = objRegExp.Replace(mess,"</span><br><img src=""graphics/line.gif"" width=""500"" height=""11""><br>")
objRegExp.Pattern = "\[kod\]"
mess = objRegExp.Replace(mess,"<span class=""forumkod"">Kod:<br><img src=""graphics/codeline.gif"" width=""500"" height=""11""><br>")
objRegExp.Pattern = "\[/kod\]"
mess = objRegExp.Replace(mess,"</span><br><img src=""graphics/codeline.gif"" width=""500"" height=""11""><br>")
forumCode = mess
End Function %>