运行代理时,有时会遇到诸如“ HTTP服务器:代理xxx超出执行时间限制”之类的错误。但是,如果再次运行,它将正确运行。这是否意味着该代理被其他任务阻止了?我应该在哪里研究原因?如下代码:
Set tDb = New NotesDatabase(db.Server, "test\Test.nsf")
Set tView = tDb.GetView("TestView")
Set tDoc = tView.GetFirstDocument
lastTest = After(tDoc.Name(0))
lastName = tDoc.Name(0)
curName = lastName
Open dirLoc & Replace(lastTest) & ".html" For Output As #1
For i = 0 To 6
Print #1, headerArray(i)
Next
While Not tDoc Is Nothing
curTest = After(tDoc.Name(0))
curName = tDoc.Name(0)
If lastTest <> curTest Then
Print #1, footerStr
Close #1
Open dirLoc & Replace(curTest) & ".html" For Output As #1
For i = 0 To 6
Print #1, headerArray(i)
Next
End If
Set dateAssigned = New NotesDateTime(tDoc.Completed(0))
timeDiff = todaysDate.TimeDifference(dateAssigned) / 3600 / 24
If timeDiff <= 10 Then
Print #1, repeatArr(0)
... ...
Print #1, repeatArr(14)
End If
lastName = curName
lastTest = After(tDoc.Name(0))
Set tDoc = tView.GetNextDocument(tDoc)
Wend
Print #1, footerStr
Close #1
答案 0 :(得分:1)
答案 1 :(得分:0)
在不知道代理做什么的情况下无法回答。我建议使用OpenNTF OpenLog或类似的方法添加一些日志记录,以便您了解在代理中花费的时间。