SAFEARRAY - how to use

[rxbagain]

I'm not sure how you call the function by I believe you must be passing fixed arrays in ServerHandles and Errors. Since these 2 parameters are "out" (Byref) parameters, the runtime engine checks if the parameter is exactly the type that is needed. Dynamic arrays and fixed arrays are different and so type mismatch is generated. Your code should be like this

Dim arrServerHandles() As Long  ' do not use Dim arrServerHandles(100) As Long
Dim arrErrors() As Long         ' do not use Dim arrErrors(100) As Long

...

Call <object>.AddItems(<param1>, <param2>, <param3>, arrServerHandles, arrErrors)

Hope it will help you