Lotus notes LotusScript:计划中的代理不运行DbLookup

Lotus notes LotusScript:计划中的代理不运行DbLookup,lotus-notes,lotusscript,lotus,Lotus Notes,Lotusscript,Lotus,我正在编写一个按计划运行的LotusScript代理。在脚本中,有一行 有点像 Dim eval as Variant eval = Evaluate({@DbLookup( "": ""; "SVR1": "db.nsf"; "aView"; "KeyValue"; 4}) 其中SVR1是服务器名,db.nsf是数据库,aView是视图,KeyValue是用于访问所需记录的键。最后一个数字4是要从中获取值的视图的列号 我已经做了一段时间了,没有问题。直到现在,脚本才似乎没有按计划运行。如果我

我正在编写一个按计划运行的LotusScript代理。在脚本中,有一行 有点像

Dim eval as Variant
eval = Evaluate({@DbLookup( "": ""; "SVR1": "db.nsf"; "aView"; "KeyValue"; 4})
其中SVR1是服务器名,db.nsf是数据库,aView是视图,KeyValue是用于访问所需记录的键。最后一个数字4是要从中获取值的视图的列号

我已经做了一段时间了,没有问题。直到现在,脚本才似乎没有按计划运行。如果我通过设计器手动运行它,它就会工作。我使用NotesLog进行调试,我注意到代理就停在这一行。它正在查找的数据库位于另一台服务器上


是什么导致此脚本失败?

我建议不要以这种方式使用
评估
。相反,最好使用本地LotusScript对象,如
NotesDatabase
NotesView
等:

Dim db As New NotesDatabase(“,”)
如注释视图所示的暗视图
Dim vc As NOTES VIEWENTRY集合
作为备注的Dim条目VIEWENTRY
Dim eval作为变体
调用db.Open(“SRV1/OrgUnit/Organization”,“db.nsf”)
Set view=db.GetView(“aView”)
设置vc=view.GetAllEntriesByKey(“KeyValue”,True)
如果vc.Count=0,则
出口接头
如果结束
Redim eval(vc.Count-1)
Set entry=vc.GetFirstEntry
索引%=-1
不进入即不进入
指数%=指数%+1
评估值(指数%)=分录值(3)
Set entry=vc.GetNextEntry(条目)
环

我建议不要以这种方式使用
评估
。相反,最好使用本地LotusScript对象,如
NotesDatabase
NotesView
等:

Dim db As New NotesDatabase(“,”)
如注释视图所示的暗视图
Dim vc As NOTES VIEWENTRY集合
作为备注的Dim条目VIEWENTRY
Dim eval作为变体
调用db.Open(“SRV1/OrgUnit/Organization”,“db.nsf”)
Set view=db.GetView(“aView”)
设置vc=view.GetAllEntriesByKey(“KeyValue”,True)
如果vc.Count=0,则
出口接头
如果结束
Redim eval(vc.Count-1)
Set entry=vc.GetFirstEntry
索引%=-1
不进入即不进入
指数%=指数%+1
评估值(指数%)=分录值(3)
Set entry=vc.GetNextEntry(条目)
环

我建议不要以这种方式使用
评估
。相反,最好使用本地LotusScript对象,如
NotesDatabase
NotesView
等:

Dim db As New NotesDatabase(“,”)
如注释视图所示的暗视图
Dim vc As NOTES VIEWENTRY集合
作为备注的Dim条目VIEWENTRY
Dim eval作为变体
调用db.Open(“SRV1/OrgUnit/Organization”,“db.nsf”)
Set view=db.GetView(“aView”)
设置vc=view.GetAllEntriesByKey(“KeyValue”,True)
如果vc.Count=0,则
出口接头
如果结束
Redim eval(vc.Count-1)
Set entry=vc.GetFirstEntry
索引%=-1
不进入即不进入
指数%=指数%+1
评估值(指数%)=分录值(3)
Set entry=vc.GetNextEntry(条目)
环

我建议不要以这种方式使用
评估
。相反,最好使用本地LotusScript对象,如
NotesDatabase
NotesView
等:

Dim db As New NotesDatabase(“,”)
如注释视图所示的暗视图
Dim vc As NOTES VIEWENTRY集合
作为备注的Dim条目VIEWENTRY
Dim eval作为变体
调用db.Open(“SRV1/OrgUnit/Organization”,“db.nsf”)
Set view=db.GetView(“aView”)
设置vc=view.GetAllEntriesByKey(“KeyValue”,True)
如果vc.Count=0,则
出口接头
如果结束
Redim eval(vc.Count-1)
Set entry=vc.GetFirstEntry
索引%=-1
不进入即不进入
指数%=指数%+1
评估值(指数%)=分录值(3)
Set entry=vc.GetNextEntry(条目)
环

似乎您正在尝试连接到服务器,而不是运行代理

在旧的lotus版本中,有一条严格的规则,即不能连接到调度代理中的另一台服务器

也就是说,如果在服务器上运行调度代理:
SRV0
则只能从服务器
SRV0
获取信息

后来(如果我在Domino6.0和更高版本中没有记错的话),新术语包括:可信服务器

因此,如果要从计划的代理访问另一台服务器,则需要将此服务器注册为受信任的服务器

要将服务器添加到受信任的服务器列表,请在服务器通讯簿中打开服务器文档


转到“安全性”选项卡,并在相应字段中指定受信任的服务器。

似乎您正在尝试连接到服务器,而不是运行代理

在旧的lotus版本中,有一条严格的规则,即不能连接到调度代理中的另一台服务器

也就是说,如果在服务器上运行调度代理:
SRV0
则只能从服务器
SRV0
获取信息

后来(如果我在Domino6.0和更高版本中没有记错的话),新术语包括:可信服务器

因此,如果要从计划的代理访问另一台服务器,则需要将此服务器注册为受信任的服务器

要将服务器添加到受信任的服务器列表,请在服务器通讯簿中打开服务器文档


转到“安全性”选项卡,并在相应字段中指定受信任的服务器。

似乎您正在尝试连接到服务器,而不是运行代理

在旧的lotus版本中,有一条严格的规则,即不能连接到调度代理中的另一台服务器

也就是说,如果在服务器上运行调度代理:
SRV0
则只能从服务器
SRV0
获取信息

后来(如果我在Domino6.0和更高版本中没有记错的话),新术语包括:可信服务器

因此,如果要从计划的代理访问另一台服务器,则需要将此服务器注册为受信任的服务器

要将服务器添加到受信任的服务器列表,请在服务器通讯簿中打开服务器文档

转到
Security
选项卡