DLL returns a variant data type - how to convert and use in VB .NET

  • Thread starter Thread starter darren.benn
  • Start date Start date
D

darren.benn

I need to convert this code to VB .NET (2003).

Dim FaxMsg As IFaxMessage

Set FaxMsg = gFC.NewMessage

Dim Recip As Variant
' add a recipient to the fax recipients collection
Set Recip = FaxMsg.Recipients.Add(0)
Recip.Name = sWho
Recip.Company = sCompany
Recip.FaxNumber = sPhone

The problem I am having is that variant type does not exist in .NET and

FaxMsg.Recipients.Add(0) returns a variant type. I have Option Strict
and
Option Explicit set to On. The upgrade utility converts the Variant to
type
Object which is no good as I can't access Name, Company and FaxNumber
properties of Recip.

Thanks in advance

Darren Benn
MCSD
 
[email protected] said:
I need to convert this code to VB .NET (2003).

Dim FaxMsg As IFaxMessage

Set FaxMsg = gFC.NewMessage

Dim Recip As Variant
' add a recipient to the fax recipients collection
Set Recip = FaxMsg.Recipients.Add(0)
Recip.Name = sWho
Recip.Company = sCompany
Recip.FaxNumber = sPhone

The problem I am having is that variant type does not exist in .NET and

FaxMsg.Recipients.Add(0) returns a variant type. I have Option Strict
and
Option Explicit set to On. The upgrade utility converts the Variant to
type
Object which is no good as I can't access Name, Company and FaxNumber
properties of Recip.

Thanks in advance

Darren Benn
MCSD
Click to expand...

I never worked much with variants, but maybe you could create a
structure MyStruct which has Name, Company, FaxNumber? Do you have
access to FaxMsg.Recipients.Add(0) to change it? If not, could maybe
try
Dim Recip as MyStruct = CType(FaxMsg.Recipients.Add(0),MyStruct)
 
Back
Top