bbcode errore 800a1399

[strip]

cosi funziona

<%
' INIZIO BBCODE
function bbcode(argStrText)
Dim objRegExp
Set objRegExp = New Regexp
objRegExp.IgnoreCase = True
objRegExp.Global = True

' 1 (smile)
objRegExp.Pattern = ":P"
argStrText = objRegExp.Replace(argStrText, "[img]" & cartellaimg & "/" & cartellasmilies & "/tongue.gif[/img]")

set objRegExp = Nothing

bbcode = argStrText
End Function
' FINE BBCODE
%>


cosi' no:


<%
' INIZIO BBCODE
function bbcode(argStrText)
Dim objRegExp
Set objRegExp = New Regexp
objRegExp.IgnoreCase = True
objRegExp.Global = True

' 1 (smile)
objRegExp.Pattern = ":P"
argStrText = objRegExp.Replace(argStrText, "[img]" & cartellaimg & "/" & cartellasmilies & "/tongue.gif[/img]")


' 2 (smile)
objRegExp.Pattern = ""
argStrText = objRegExp.Replace(argStrText, "[img]" & cartellaimg & "/" & cartellasmilies & "/smile.gif[/img]")

set objRegExp = Nothing

bbcode = argStrText
End Function
' FINE BBCODE
%>


come mai nel secondo caso che ho aggiunto un'altro smilies mi da questo errore:

Microsoft VBScript runtime error '800a1399'

Syntax error in regular expression

[Santino83_02]

perchè la parentesi tonda è riservata

objRegExp.Pattern = ":\)"

[strip]

mitico!

[Santino83_02]

Originariamente inviato da strip
mitico!

che bucio di c..o