planification d'un agent

[asx9]

voici mon agent:Sub Initialize Dim session As New notessession Dim db As notesdatabase Dim coll As notesdocumentcollection Dim doc As notesdocument Dim workspace As New NotesUIWorkspace Dim view As NotesView Dim maVue As String Set db = session.CurrentDatabase maVue = "(tout)" Set view = db.GetView(maVue) Set doc=view.GetFirstDocument form = "info" While Not doc Is Nothing Msgbox("1") If doc.getitemvalue("Datedemande")(0) = "" Then Msgbox("2") doc.Datedemande = Now Call doc.Save(True, False) End If Set doc = view.GetNextDocument(doc) Wend End Subil met la valeur @Now dans le champ "Datedemande" si celui-ci est vide.Lorsque j'actionne l'agent manuellement ça marche, mais quand je le planifie (toutes les 30min) ça ne fonctionne pas! porque? (je suis en V4.6)

[Droad]

l'agent ne s'exécute pas ? s'exécute mais ne fait rien ? ya des messages d'erreurs dans la log ?[%sig%]

[asx9]

l'agent ne s'exécute pas et il n'y a pas de message d'erreur, il ne se passse absolument et désespérément rien.sinon je devrai avoir les message "1" et "2".

[Droad]

Pas avec un agent planifié. Les messages (print, messagebox) sont envoyé directement dans la log (log.nsf).Si tu fais un clic droit sur l'agent, dans le pop-up, tu as une entrée "Log ..."ou "Historique ..." qui t'indique la date de dernière exécution de l'agent.Vérifie ça et la log.[%sig%]

[asx9]

j'ai fais: clique droit sur l'agent puis dans "journal..." et j'ai le message: cet agent n'a jamais été utilisé!

[asx9]

j'ai refais des tests sur mon agent mais il ne veut toujours pas fonctionné en mode "planifié", alors qu'il est bien activé. il est sensé être activé toutes les 30min mais rien ne s'est jamais passé. et pourtant en activant l'agent à partir du menu "Action" ça marche très bien.il y a un truc que je ne sais pas?

[asx9]

lorsque je teste mon agent planifié en faisant clique de droit dessus et exécuté, ça marche bien également.Je suis vraiment dans l'impasse avec cet planification de malheur qui ne veut pas marcher.quelqu'un verrait-il une solution à mon problème?merci d'avance

[Rigol'man]

tu peux poster le code de l'agent et ses caracteristiques(quels docs sont traites ? quand l'agent doit il etre lancé ? etc ...) STP?[%sig%]

[asx9]

voici le code de l'agent qui va regarder si le champ "Datedemande" est vide ou pas. si il l'est alros Datedemande=Now.L'agent est lancé pour tous les documents, il est programmé selon planification horaire (toutes les 30 min) et il est activé.Sub Initialize Dim session As New notessession Dim db As notesdatabase Dim coll As notesdocumentcollection Dim doc As notesdocument Dim workspace As New NotesUIWorkspace Dim view As NotesView Dim maVue As String Set db = session.CurrentDatabase maVue = "(tout)" Set view = db.GetView(maVue) Set doc=view.GetFirstDocument form = "info" While Not doc Is Nothing If doc.getitemvalue("Datedemande")(0) = "" Then doc.Datedemande = Now Call doc.Save(True, False) End If Set doc = view.GetNextDocument(doc) Wend End Sub(je suis sous la V4.6)

[philippeG]

L'agent planiifié s'exécute sur le serveur.Il faut que le propriétaire de l'agent ai le droit d'exécuter des agents sur le serveur.Regarde dans le journal du serveur il doit y avoir un info concernant cet agent2 solutions : Si tu es copain avec les admin demandent les droits d'exécution des agents sur le serveur sinon demande a quelqu'un qui a les droits de signer ton agent (les admin par exemple)

[Stephane Maillard]

Bonjour,Tout à fait normal que cela ne fonctionne pas ! Un agent planifié ne peut pas utilisé d'interface "Font End" la ligne 'Dim workspace As New NotesUIWorkspace' ne sert à rien dans le code il faut la supprimé pour commencer. De plus on fait 'Dim Session As NotesSession' et après un 'Set Session = New NotesSession'.[%sig%]

[asx9]

je l'exécute sur local donc il ne devrait pas avoir de problème (je travail sur une petite base test sur local).

[asx9]

le "Dim session As New notessession" ne sert à rien non plus?

[Stephane Maillard]

Re,Bien sur qu'il sert pour prendre la DB en cours, cela est juste une manière, plus facile à lire :' Déclaration des variablesDim Session As NotesSessionDim Db As NotesDatabase' Récupération des données utilisateurSet Session = New NotesSession' Récupération de la base couranteSet Db = Session.CurrentDatabase' Etc...[%sig%]

[asx9]

OK, c plus clair!!!pour savoir si ma planification va marcher, réponse dans maintenent 20min,je vous tiens au courant.merci