肿么用代码执行代理？

[虎老狮]

代码如下：

        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，但是代理没有执行，请问是我代理设置有问题吗？基于时间，基于事件都试过了

[Justin-Liu]

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

[虎老狮]

引用 1 楼 FoxDave 的回复:

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

后来才发现，其实已经执行了，只是不报消息而已