如何使用Perl通过Lotus Notes API打开收件箱？

发布时间：2020-12-16 06:16:28 所属栏目：大数据来源：网络整理

导读：我可以使用Perl打开Lotus notes api,没有错误,我也可以获得包含Inbox的视图列表,但是当我尝试从该视图中读取消息时它看起来是空的？我可能做错了什么？ (事实上??,这些代码之前的工作似乎可能会在注释方面发生变化) 代码结果如下： View的名称是：($Inbox)的

我可以使用Perl打开Lotus notes api,没有错误,我也可以获得包含Inbox的视图列表,但是当我尝试从该视图中读取消息时它看起来是空的？我可能做错了什么？ (事实上??,这些代码之前的工作似乎可能会在注释方面发生变化)

代码结果如下：
View的名称是：($Inbox)的计数为：0
等等

码：

use Win32::OLE;
my $Notes = Win32::OLE->new('Notes.NotesSession')
or die "Cannot start Lotus Notes Session object.n";
my $database = $Notes->GetDatabase("",'mailVIMM.nsf');
$database->OpenMail;
my $array_ref = $database->{Views};
foreach my $view (@$array_ref) {
    my $name = $view->{Name};
    print "NAME of View is: $name ";
    $view = $database->GetView($name);
    print "has count of: ",$view->{entryCount},"n";
}

解决方法

邮箱是否对所有用户开放？您可以尝试设置-Default-访问管理器并为其授予所有可用角色,以确保不会出现安全问题,从而无法查看文档.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!