PS: Der "Hacken" oder das "Häckchen" schreibt sich auch nach "neuer deutscher Rechtschreibung" nicht mit "ck" ;D
Sub Click(Source As Button)
Dim ws As New NotesUIWorkspace
Dim Session As New NotesSession
Dim UIDoc As NotesUIDocument
Dim agent As NotesAgent
Dim Forward As String
Set UIDoc = ws.CurrentDocument
Set Agent = Session.CurrentDatabase.GetAgent("forwardandcopy")
Forward = uidoc.FieldGetText("fwdaddress")
If Forward <> "" Then
Agent.IsEnabled = True
Call uidoc.FieldSetText("CurrentStatus", "1")
Call Agent.Save()
Call uidoc.Save()
Call uidoc.reload()
Call uidoc.Refreshhideformulas()
Else
Msgbox "Please, enter a valid forwarding address"
End If
End SubSub Click(Source As Button)
Dim ws As New NotesUIWorkspace
Dim Session As New NotesSession
Dim UIDoc As NotesUIDocument
Dim agent As NotesAgent
Set UIDoc = ws.CurrentDocument
Set Agent = Session.CurrentDatabase.GetAgent("forwardandcopy")
Agent.IsEnabled = False
Call uidoc.FieldSetText("CurrentStatus", "0")
Call Agent.Save()
Call uidoc.Save()
Call uidoc.reload()
Call uidoc.Refreshhideformulas()
End SubNein kann ich mir nicht vorstellen. Der Agent wurde nur mit einem R6 Client geschrieben.
Vorweg der Agent stammt nicht von mir sondern von einem unserer Designer (der weiß auch nicht was das bedeutet). Die User können den Agent über eine "Form" enablen und disablen. Und genau wenn das ausgeführt wird erscheinen die Symbole.
Häckchen mit 6 wenn der Agent über die Form enabled ist.
Häckchen mit 5 wenn der Agent über die Form disabled ist.
Wenn ich den Agent im Designer enable hat er auch das Häckchen wie gewohnt.
Achja wenn der Agent mit dem Häckchen + 6 enabled ist, läuft er nicht auf das Event After new Mail has arrived
Available since 5.0.8, but only added to the UI since 6.0
If it is just a plain check mark then it will run on any Domino Server, 5 or 6.
If it is a check with a 6 above it then it will run on any domino server 5.0.8 or ABOVE.
If it is a check with a 5 below it then it will run on any domino server 5.07 or BELOW.
It has to do with the new functionality in 6 that allows users to activate and deactivate agents.
Paul T. Calhoun
@hoehlerbv & TMCAaah, jetzt macht's Sinn :)
he mauna des is fiar mi a G'fret hochdeitsch zum schreib'n, oiso seid's froh das i mi bemüh ;D ;D ;D