VBScript error '800a01F4'

Ever since we updated from 9+ to 10.03 we get the error above and cannot find the solution!

VBScript Error "800a01F4"

----------------------------------------
Line 113 through 126 is as follows with 118 Bold;

'Get the file types we are uploading
    If strUploadType = "file" Then
        lngMaxFileSize = lngUploadMaxFileSize
        saryFileUploadTypes = Split(Trim(strUploadFileTypes), ";")
    ElseIf strUploadType = "image" Then
        lngMaxFileSize = lngUploadMaxImageSize
        saryFileUploadTypes = Split(Trim(strImageTypes), ";")
    End If
   
    'If no file type of extensions set then leave now
    If isArray(saryFileUploadTypes) = False Then
        blnExtensionOK = False
        Exit Function
    End If


What is the solution?

I believe the VBScript Error "800a01F4" means the variable is not defined.

The variable is defined in line 86 of functions/functions_upload.asp:-