function virker i VBA, men ikke i vbscripts (outlook form)

Hej!

Denne Function virker i VB og VBA men ikke i vbscripts i outlook 2000 forms?
Function BeregnSats(late As Variant, StdSats As Variant) As Integer
Dim Index
Dim Sats
    Sats =0   
    Index = 1.5
      if Late = -1 then
        Index = Index * 2
    end if
    Sats = Index * StdSats
    BeregnSats = Sats
End Function

Script debugger siger der mangler et \")\" i Functions statement???????