PDA

View Full Version : 请教:使用LotusScript中send方法提示服务器未响应


ajingmz
25-07-06, 09:35 AM
请教大家一个问题:

我用lotusscript中的send方法从A(R5)服务器往B(R6)服务器发送文档,提示“服务器未响应”,配置了相应的函件收集库,“分行@domain”对应B服务器,也配置了连接文档。
使用的是以下代码:

Dim s As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument

Set db = s.CurrentDatabase
Set doc = db.CreateDocument
doc.form = "frmExchange"
doc.TFileTitle = "@#测试文档"
doc.sendto = "分行@domain"
Call doc.Save(True,True)
Call doc.Send(False)

但是从B(R6)服务器往A(R5)服务器发送文档就可以

[ 本帖最后由 ajingmz 于 2006-7-25 09:47 AM 编辑 ]

恋猪明
25-07-06, 09:37 AM
服务器的POP3服务开了吗????

ajingmz
25-07-06, 09:41 AM
是的,都开了
因为上传下载都没问题并且B服务器也能给A服务器发送成功

[ 本帖最后由 ajingmz 于 2006-7-25 09:48 AM 编辑 ]

恋猪明
25-07-06, 09:50 AM
Notes.ini 文件里面有没有+POP3服务
ServerTasks=Update,Replica,Router,AMgr,AdminP,CalConn,Sched,HTTP,IMAP,LDAP,POP3

还有看看服务器的防火墙设置

ajingmz
25-07-06, 09:58 AM
note.ini中有
服务器端只开了诺顿,关调后也不行