Replace con funzione

[Federix]

Ho una parte del mio sito dove inserisco gli articoli su vari codici di programmazione. Quando inserisco l'articolo, metto anche [ code ]codice[ /code ] per scrivere il codice del linguaggio, proprio come avviene in questo forum.
Quando vado in visualizzazione, effettuo un replace del [ code ] così:

msg = replace(msg, "[ code ]", "<code>")
msg = replace(msg, "[ /code ]", "</code>")

cosi facendo mi incolonna per bene tutto il codice dentro, però non mi scrive il codice ma ciò che ne risulta. Ho pensato di mettere un server.htmlencode per trasformare le scritte in formato HTML, però non riesco a farlo funzionare. Ho provato così:

msg = replace(msg, "[ code ]", "<code><%=server.htmlencode(")
msg = replace(msg, "[ /code ]", ")%></code>")

Ma non funziona.
Nella speranza che abbiate capito il problema, avete idea di come mettere questo replace giustamente?

[willybit]

Ciao Federix,

potresti usare le regular expressions

set re = new RegExp
re.Pattern="\[code\]([^\v]*?)\[\/code\]"
re.IgnoreCase=true
re.Global=true
re.Multiline=true
set ris = re.Execute(msg)
for each rr in ris
  msg = Replace(msg,rr,"<code>" & Server.HTMLEncode(rr.SubMatches(0)) & "</code>")
next