Howard,

I get the following:

quote:

Script error: unknown or unexpected command [my]!
my $objCDO = Win32::OLE->CreateObject("CDONTS.NewMail");

I removed the my

quote:

Script error: Error in expression.!

If I change it to:
code:
$objCDO = CreateObject("CDONTS.NewMail");
IF @error <> 0 ?@error " CDONTS not found" SLEEP 2 EXIT ENDIF

It returns:
-2147221005 CDONTS not found

Thanks,

Kent

[ 06. December 2002, 22:26: Message edited by: kdyer ]
_________________________
Utilize these resources:
UDFs (Full List)
KiXtart FAQ & How to's