Also, if I remove the Attach section ( which is supposed to attach a gif for the
attached html page ), I get a blank email sent to me with a blank attachment called
ATT12345.html.
It should be an email with a text body and an html page attached with html code in it.
Any thoughts??
Thanks
Dan
>
> I'm getting this error from Mial::Sender and am not sure why.
> Can't locate object method "Attach" via package "Mail::Sender"
>
> What should I check/did I miss/am I doign wrong/etc???
>
> Thanks
>
> Dan
> +++++++++++++++++++
>
> Below is the perl and the output from the script :
>
> __SCRIPT__
> my $contract_html = set_contract_html();
>
>
> print "Sending contract... <br> \n";
>
> use Mail::Sender;
> eval {
>
> $sender = new Mail::Sender {smtp =>
> "$smtp_serv", from => "$from"};
> $sender->OpenMultipart({subject =>
> "$subject", to => "$email_to"});
> $sender->Body({ctype => 'text/plain', msg => $text});
> $sender->Part({ctype => 'text/html',
> disposition => 'attachment',
> msg => $contract_html
> });
> $sender->Attach({
> description => 'Infiniplex Logo',
> ctype => 'image/gif',
> encoding => 'base64',
> disposition => 'attachment;
> filename="infinlogo.gif"; type="Gif Image"',
> file => 'infinlogo.gif'
> });
> $sender->Close();
> };
>
> if($@) { print "... $@ :: <br>Error sending mail:
> $Mail::Sender::Error <P> \n"; }
> else { print "... Mail sent ok! <P> \n"; }
>
> __SCRIPT OUTPUT__
>
> Sending contract...
> ... Can't locate object method "Attach" via package
> "Mail::Sender" at /usr/local/www/data/employee/contract.cgi
> line 114, chunk 5. ::
> Error sending mail:
>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
