Hur gör jag om jag vill bakgrunds färg på <% och på %> när dom finns med i texten?

Det måste ju vara nån sorts Replace men jag kan inte det så bra.

/Johan

Detta kanske funkar....

<code>
Function byt(strText)
On error resume next

Set regExp = New regexp

regExp.Global = true
regExp.IgnoreCase = true

strText = Replace(Trim(strText),vbCrLf, "<br>")

'Tecken Stilar
strText = Replace(strText,"&lt%","<font style='background-color: #FFFF00'>&lt%</font>")
strText = Replace(strText,"&gt%","<font style='background-color: #FFFF00'>&gt%</font>")

' Skriver ut texten, uppdelad och fin!
byt = strText

End Function</code>

jag gissar att du har en server.html encode före

<code>
variabel = replace(variabel,"&lt;%","<font style=""background-color: yellow;"">&lt%</font>")

variabel = replace(variabel,"&gt;%","<font style=""background-color: yellow;"">&gt%</font>")

</code>

har inte testat mend et borde fungera.. är inte säker på om jag skrev stylen rätt