Function SomeFunc(ByVal argWhatever As Dictionary) _
                       As ???SomeObject???  '(or Variant or Object)

or

Function SomeFunc(ByRef argWhatever As Variant) _
                       As ???SomeObject??? '(or Variant or Object)

--
Michael Harris
MVP Scripting

Is this possible?

I would like to do the following:

Dim o, oX, oRet

set oX = Server.CreateObject("Xxx.Yxx")
set o = Server.CreateObject("Scripting.Dictionary")
set oRet = oX.SomeFunc(o)

When I try to run this, I get a "Type Mismatch" error on the last
line. When I change the ActiveX function to take a string instead (and
pass in a string), it all works.

Any help with this will be greatly appreciated.

PS: If possilble, email responses to me at the address below, since I
can't always get access to news.

TIA

I would like to do the following:

Dim o, oX, oRet

set oX = Server.CreateObject("Xxx.Yxx")
set o = Server.CreateObject("Scripting.Dictionary")
set oRet = oX.SomeFunc(o)

When I try to run this, I get a "Type Mismatch" error on the last
line. When I change the ActiveX function to take a string instead (and
pass in a string), it all works.

Any help with this will be greatly appreciated.

PS: If possilble, email responses to me at the address below, since I
can't always get access to news.

TIA

Now it seems my ActiveX dll will only work from the ASP script, and
not from VB.

Thanks for the help.

On Mon, 12 Jun 2000 22:55:41 -0700, "Michael Harris"