0 Then Msgbox "Errore nell'esecuzione dell'Agente.", MB_ICONSTOP End If">
> |  
re : script post open
cyberflaz
Dim db as NotesDatabase
Dim agent As NotesAgent

Set db = Source.Document.ParentDatabase
Set agent = db.GetAgent("xxxPostOpen")
If agent.Run() <> 0 Then
Msgbox "Errore nell\'esecuzione dell\'Agente.", MB_ICONSTOP
End If

Massimo Nadalin | Devangarde

script post open - Giulio -
    You are here re : script post open - cyberflaz -
    re : script post open - cyberflaz -
    re : script post open - Giulio -