Problemer med Function

Hejsa!
Har efterhånden en del problemer med mit web-site *suk*
På min IIS Server virker funktionen fint, men når den bliver smidt op på en online web-server giver den fejl!

Funktionen (Til at splitte ord der er for lange op) er :
<%
Function TextRepair(Streng)
  TextRepair = Streng
  If Not IsNull(TextRepair) Then
      WrdLen = 40
      Set regEx = New RegExp
      regEx.IgnoreCase = True
      regEx.Global = True
      regEx.Pattern = "[^ \n]{" & WrdLen & "," & WrdLen & "}"
      Set Matches = regEx.Execute(TextRepair)
      For Each Match in Matches
      TextRepair = Replace(TextRepair, Match.Value, Match.Value & " ")
      Next
      Set regEx = Nothing
  End If
End Function %>


Fejlen jeg får er følgende:

Microsoft VBScript compilation error '800a03ea'

Syntax error

/ny-side/index.asp, line 6

Set regEx = New RegExp
------------^



Nogen der ved hvorfor jeg får den fejl ? :<