> Please help me to get out of following situation ...

> There is a function in one of my dlls whose signature is as follows :
> my_function(integer X,  integer Y, char* Z, HAD A, HAD P)

> Here HAD is defined as follows in one of the header files as :

> #define HAD                         LPSAFEARRAY FAR *

> The above dll was written in VC++ 6.0 . I use to call this function
> in my Visual Basic 6.0 application.

> Recently , I upgraded my Visual Basic application and found
> that its giving "SafeArrayTypeMismatchException"

> Declaration for my Function is as follows :

> Declare Function my_function Lib "tcvbadm.dll" (ByVal X As Integer,
> ByVal Y
> As Integer, ByVal Z As String, A() As String, A() As Integer) As
> Integer

> And the way I am calling in my VB application is as follows :

> Dim li_count as Integer
> ReDim la_leaf(li_count) As String
>  ReDim la_access(li_count) As Integer

> retcode = my_function(X, Y, Z, A(), B()) ' HERE I AM GHETTING THE
> EXCEPTION
> WHERE AS IT WAS WORKING WELL PREVIOUSLY

> 'I fetch li_count through a different fi=unction call which returns an
> integer value.

> Please let me know if any further info is reqd regarding this. Any
> help
> would be highly apprecaited ,
> Thanks a lot in advance.

> Thanks & Regards

> Sudhansu Tiwari