https://bugs.documentfoundation.org/show_bug.cgi?id=146281

--- Comment #6 from Andreas Heinisch <[email protected]> ---
Have to investigate further, but in the function TraceError I get the error
message "Argument is not optional" raised at:

Public Function _CheckArgument
...
    bValidIsMissing = ( VarType(pvValid) = vbError )
...

called in:

Public Function OpenDatabase
...
    If Not Utils._CheckArgument(pvDatabaseURL, 1, vbString) Then Goto
Exit_Function
...

Strange though that here the iVarType is not vbString:

Dim iVarType As Integer, bValidIsMissing As Boolean
        If IsArray(pvType) Then iVarType = VarType(pvType(LBound(pvType))) Else
iVarType = VarType(pvType)
        If iVarType = vbString Then                                     '      
pvType is a pseudo-type string
                _CheckArgument = Utils._IsPseudo(pvItem, pvType)
        Else
                bValidIsMissing = ( VarType(pvValid) = vbError )
                If Not bValidIsMissing Then bValidIsMissing =
IsMissing(pvValid)
                If bValidIsMissing Then _CheckArgument =
Utils._IsScalar(pvItem, pvType) Else _CheckArgument = Utils._IsScalar(pvItem,
pvType, pvValid)
        End If

-- 
You are receiving this mail because:
You are the assignee for the bug.

Reply via email to