肿么用代码执行代理？该怎么解决_Lotus

肿么用代码执行代理？

本帖最后由 talkwah 于 2014-12-24 14:28:57 编辑

代码如下：


        Dim agent As NotesAgent  
	Set agent=session.CurrentDatabase.GetAgent("agDeleteDocs")  
	If agent.Run  = 0 Then
	Else
		Messagebox "Agent did not run",, "Failure"
	End If

agent.Run 返回了0，但是代理没有执行，请问是我代理设置有问题吗？基于时间，基于事件都试过了

------解决思路----------------------
还是触发器吧？点击菜单的时候执行某个操作那种？
事件