作成者カテゴリ 
公開
しいな
02/03/2010 01:55 PM
エージェント
ノーツサーバノーツクライアントサーバOSクライアントOSネットワークプロトコル
6.x6.xN/AN/AN/A

スクリプトでエージェントを実行

いつも拝見させていただいてます。

2つのエージェントを連続で実行させたいと思ってます。
過去レスをみて、以下の処理を入れてみましたが、
実行されませんでした。ヘルプをみると
「エージェントは再帰的には実行できません (エージェント自身から呼び出すことはできません)。」
とありましたので、だめもとでエージェントからボタンに変えてみたのですが、同じく実行はされませんでした。

ボタンにしたなら式でToolsrunmacroやrunagentなどを使ったり
シンプルアクションなどでもよいのですが、
実は、ユーザに日付をインプットしてもらうので
できたら、エージェントの中に次のエージェントの呼び出しを
いれこめないかな?と思っているのです。

でもヘルプではエージェントで呼び出せないといっているので
他にできないかと試行錯誤しているところで、良案ございましたら
ご教授いただけないでしょうか?

↓これでは実行されませんでした。
Dim ss as new Notessession
Dim DB as Notesdatabase
Dim agent As NotesAgent
set DB = ss.Currentdatabase
Set agent = DB.GetAgent("エージェント名")
Call agent.Run

ちなみに以下をつけてデバックしてみたところ、
「実行しました」となりますが実行してませんでした。

If agent.Run = 0 Then
Msgbox "実行しました"
Else
Msgbox "実行しませんでした"
End If

よろしくおねがいします。



[Previous Main Document]
スクリプトでエージェントを実行 (しいな) * 現在地 *
. . Re: スクリプトでエージェントを実行 (わろ)
. . . . Re: スクリプトでエージェントを実行 (しいな)
[Next Main Document]