<div>想用perl通过lotus notes发送邮件,但是不知道发送邮件用什么指令,网上查到vbscript是用sento,但是perl中不支持,不知道如何解决,请赐教,谢谢</div>
<div> </div>
<div>use Win32::OLE;</div>
<p>my $Notes = Win32::OLE->new('Notes.NotesSession')or die "Cannot start Lotus Notes Session object.\n";<br>my $Database = $Notes->GetDatabase("$server", "mail\$userid.nsf") or die "Could not open database.\n";<br>
#my $Database->OpenMail;<br>my $Doc = $Database->CreateDocument;</p><br><br>
<div><span class="gmail_quote">2008/3/31, purl lamp <<a href="mailto:lamp.purl@gmail.com">lamp.purl@gmail.com</a>>:</span>
<blockquote class="gmail_quote" style="PADDING-LEFT: 1ex; MARGIN: 0px 0px 0px 0.8ex; BORDER-LEFT: #ccc 1px solid">welcome to visit us at shanghai, we have a lot of thing to share and<br>some plan to discuss.<br><br>maybe that will also kick start some interesting relationship between<br>
perl learners here. which make practical language really able to<br>learn.<br><br>2008/3/29, cnhacktnt <<a href="mailto:cnhacktnt@gmail.com">cnhacktnt@gmail.com</a>>:<br>> hi Qiang,<br>><br>> Welcome back to China, I am in Shanghai, my cellphone: +86 1 3 5 6 4 2 0<br>
> 8 2 0 0<br>><br>><br>><br>><br>> Qiang (James) Li wrote:<br>> > hi all,<br>> ><br>> > i am going to stay in china for few months and mainly be in beijing,<br>> > maybe shanghai.. would like to meet some of you in real person after<br>
> > so many year :)<br>> ><br>> > drop me a line privately with your phone number and i will try to<br>> > reach you when i get there.<br>> ><br>> > Qiang<br>> > _______________________________________________<br>
> > China-pm mailing list<br>> > <a href="mailto:China-pm@pm.org">China-pm@pm.org</a><br>> > <a href="http://mail.pm.org/mailman/listinfo/china-pm">http://mail.pm.org/mailman/listinfo/china-pm</a><br>
><br>> _______________________________________________<br>> China-pm mailing list<br>> <a href="mailto:China-pm@pm.org">China-pm@pm.org</a><br>> <a href="http://mail.pm.org/mailman/listinfo/china-pm">http://mail.pm.org/mailman/listinfo/china-pm</a><br>
_______________________________________________<br>China-pm mailing list<br><a href="mailto:China-pm@pm.org">China-pm@pm.org</a><br><a href="http://mail.pm.org/mailman/listinfo/china-pm">http://mail.pm.org/mailman/listinfo/china-pm</a></blockquote>
</div><br><br clear="all"><br>-- <br>BR<br>Steven.zhu