RE: Interface perl to exchange server

[Tillman, James]

Sorry, but no, I haven't seen any sites that provide that kind of help.  Perhaps some others have seen something.  For the most part, it's always been a case of converting things like this:

 

Set MyObject = CreateObject("MyLibrary.MyClass")

MyObject.Property = "Value"

arrRetVal = MyObject.MethodThatReturnsAVariantArray("MyParameter")

For each Thingy in arrRetVal

    Thingy.Property = "NewValue"

Next

 

To this:

 

use Win32::OLE;

my $my_object = new Win32::OLE('MyLibrary.MyClass');

$my_object->{Property} = 'Value';

my $ret_val = $my_object->MethodThatReturnsAVariantArray('MyParameter');

foreach my $thingy (in($ret_val)) {  #      "in" is a special function provided by Win32::OLE

                                                  #       see the docs for more info

    $thingy->{Property} = 'NewValue';

}

 

Don't bother proofreading that, since there's almost certainly a syntax error somewhere...

jpt

 

 -----Original Message-----
From: Norris, Joseph [mailto:[EMAIL PROTECTED]]
Sent: Friday, September 06, 2002 11:43 AM
To: Tillman, James; Norris, Joseph; Perl Admin (E-mail); Perl Win32 Users (E-mail)
Subject: RE: Interface perl to exchange server

Thanks James,

 

 

I have played a little with conversion from VB to perl structure - the simple stuff I have been able to handle but BOY! some of the code I get lost in.

Do you any guide lines or a site that explains how to look at some of the structures from VB to Perl - in particular how to determine when you need

a pointer to an array as opposed to a hash and how to determine if there is a hash within a hash or an array within a hash? I have used Data Dumper

for some of the decoding but it has been rough going.

 

-----Original Message-----
From: Tillman, James [mailto:[EMAIL PROTECTED]]
Sent: Friday, September 06, 2002 5:48 AM
To: 'Norris, Joseph'; Perl Admin (E-mail); Perl Win32 Users (E-mail)
Subject: RE: Interface perl to exchange server

You can try using Win32::OLE to interface with Collaboration Data Objects (CDO).  You'll find docs on using CDO on msdn.microsoft.com.  All you have to do is convert the VB examples to Perl, which isn't all that hard to do once you get the hang of it.

 

Good luck!

 

jpt

-----Original Message-----
From: Norris, Joseph [mailto:[EMAIL PROTECTED]]
Sent: Thursday, September 05, 2002 5:56 PM
To: Perl Admin (E-mail); Perl Win32 Users (E-mail)
Subject: Interface perl to exchange server

Group,

 

I have been using MIME::Lite to send mail via our exchange server.  However I am find that I can not send mail to non-smtp email recipients who

have internal email but no access to internet email.  Is there a way around this?

 

Thanks.