当前位置:软件学习 > 其它软件 >>

我的定时发送邮件代理不能执行,请大家帮忙

我做了一个定时发送邮件的定时代理,在Domino A 上可以成功运行,将其拷贝到Domino B 上却不能运行了,当然位置已选择成当前服务器,数据库权限、通讯录安全选项中的执行权限都加上了,就是不能执行,LOG错误如下:
AMgr: Agent ('modify' in 'oa\oa.nsf') error message: Notes error: You do not have a mail file/server specified.  Use File Mobile Edit Current Location... to set them.

代理代码如下:
Dim session As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim doc As NotesDocument
Dim dateTime As New NotesDateTime( "" )
Dim D_Only As String 
dateTime.LSLocalTime = Now
Set db = session.CurrentDatabase
Set view = db.GetView( "zbb_view" )
Set doc = view.GetFirstDocument
Call dateTime.AdjustDay( 12 )
D_Only=dateTime.DateOnly

'发送邮件通知值班人员
Dim newdoc As notesdocument
Set newdoc=New notesdocument(db)
newdoc.Form = "Memo"
newdoc.subject="友情提醒:今晚您值班!"
Set doc2 = view.GetNextDocument( doc )
Call newdoc.Send( True, doc2.sendto)

doc.rq=Cdat(D_Only)

Call doc.Save (False,True)

是一个值班提醒,值班表自动轮转,请大家帮忙看看是什么原因,感谢! --------------------编程问答-------------------- 按服务器提示, 应该是没有这个邮件吧!  你可以看看doc2.sendto 对应的邮件是不是存在 --------------------编程问答-------------------- doc2.sendto邮件应该是存在的,因为我手动执行是成功的。 --------------------编程问答-------------------- 遇到过这个问题,如果你手动执行代理可以运行,在服务器上却不能执行,先看看数据库是否签名,如果还没解决就重起下服务器。 --------------------编程问答-------------------- 这个不是签名的问题。提示信息是说你没有配置邮件或者文件服务器,检查一下服务器的通讯录配置。 --------------------编程问答-------------------- 我实在找不出原因来了,将代理拷贝到另一服务器运行正常,代码应该没问题,可能是设置原因,哪位好心人以前遇到过指点一下,具体修改那项配置。 --------------------编程问答-------------------- 新注册一个管理员ID,该ID的邮件服务器选择Domino B ,然后用该ID给代理签名,应该就可以了。 --------------------编程问答-------------------- dominoB的服务器文档邮件服务器设置可能有问题,在看看b服务器Notes.ini中的mailserver是不是等于空了 --------------------编程问答-------------------- 路过,关注
补充:企业软件 ,  Lotus
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,