PERL Beginners - How to set a COM Object property to TRUE

Author

How to set a COM Object property to TRUE

bmw108@gmail.com

2007-09-26, 10:00 pm

Hello,

I am trying to set a WIN32 COM Object bool property true to enable a
validation option.

I can do it in VB like so.

emailPtr.CorrectSyntax = True

How do I do it in PERL?

I have tried so many different things to no avail.

$emailObj->{MxLookup} = (TRUE);
$emailObj->{MxLookup} = $TRUE;
$emailObj->{MxLookup} = 1;
$emailObj->{MxLookup} = TRUE;

Can anyone help?

Jenda Krynicky

2007-09-26, 10:00 pm

From: bmw108@gmail.com
> I am trying to set a WIN32 COM Object bool property true to enable a
> validation option.
>
> I can do it in VB like so.
>
> emailPtr.CorrectSyntax = True
>
> How do I do it in PERL?
>
> I have tried so many different things to no avail.
>
> $emailObj->{MxLookup} = (TRUE);
> $emailObj->{MxLookup} = $TRUE;
> $emailObj->{MxLookup} = 1;
> $emailObj->{MxLookup} = TRUE;

Try
$emailObj->{MxLookup} = -1;
# yes, CInt(True) == -1

or
use Win32::OLE::Variant;
$emailObj->{MxLookup} = Variant(VT_BOOL, -1);

HTH, Jenda
===== Jenda@Krynicky.cz === http://Jenda.Krynicky.cz =====
When it comes to wine, women and song, wizards are allowed
to get drunk and croon as much as they like.
-- Terry Pratchett in Sourcery

Sponsored Links