Hi..

I need to convert a variant to a byte array....

In the Variant is an array... I need to convert the variant to a Byte Array,
send it to another program and then reconstruct the variant as it existed
previously.

So if this was possible in VB... Life would be good... (unfortunately Life
is NOT good)

Dim v as variant
Dim b() as Byte
Dim vNew as variant

v = Array("abc", "def", "geh")
b = v
..
..
vNew = b
..

vNew should have the same poperties as the original "v" variant variable...
(ie. embbeded array)

Any help appreciated...

Cheers

Dim pb As PropertyBag
Set pb = New PropertyBag
...
pb.WriteProperty "MyVariant", v
b = pb.Contents
Set pb = Nothing

And then reverse the process in the recieving code.

The only problem is that it doesn't work on arrays like in the code
you posted. You'd have to iterate the array and save each element.

Matt

============================================

  CodeHound - Free VB Search Engine
  http://www.codehound.com

--
Eduardo A. Morcillo
http://www.domaindlx.com/e_morcillo