Vorrei creare una struttura che colori le scritte in base ai segni negativo e positivo che vi sono all'inizio di ogni frase.

Per rendere l'idea:
codice:

<font color="#FF0000">- giudizio negativo</font></p>


<font color="#008000">+ giudizio positivo</font></p>
ed ho fatto
codice:
<%
dim strSegno
strSegno="+"

dim strColor
strColor="#008000"

if strSegno<>"+" then
strColor="#FF0000"
end if
%>



<font color="<%strColor%>">- giudizio negativo</font></p>


<font color="<%strColor%>">+ giudizio positivo</font></p>
ma non va dandomi questo errore:

Microsoft VBScript runtime error '800a000d'

Type mismatch

/colore.asp, line 25