was haben wir probiert...
Vielleicht einfacher ...
Dim dbMe As NotesDatabase
Dim ses As New NotesSession
Set dbMe = ses.CurrentDatabase
Set agent = dbMe.GetAgent("Update Tasks")
agent.ServerName = dbMe.Server
If agent.Isactivatable = True Then
agent.IsEnabled = True
Call agent.Save
End If
Mit diesem Code lässt sich der Agent nciht aktivieren.
Allow User Acitivation ist an, User hat Editor, es wird der Code durchlaufen allerdings mit der Fehlermeldung "Invalid Value Type". Sonst steht da nix. Google hat mir dazu keine passenden Treffer geliefert. Eija und der Agent läuft mit "UNRESTRICTED", was uns zwar nicht gefällt, wir aber akzeptieren würden wenns funktionieren würde... Es funktioniert aber leider nicht.
Was wissen wir?
Unter 8.5.1er Client und und 8.5.1er Mailschablone mit 8.5.1er Server gehts, unter 8.5.2 und 8.5.3 (client/mailschablone/server in beiden Fällen) gehts nicht.
Bei einer Neuanlage des Users funktioniert die Aktivierung am 1ten Tag. Am nächsten Tag steht der User im EDC und ab diesem Zeitpunkt funktionierts nicht mehr. Löscht man ihn raus, gehts wieder bis der Eintrag wieder erstellt wurde.
Jetzt könnte man meine ist doch klar...
Das selbe EDC läuft bei 80 Mandanten, bei 4 funktionierts nicht. Wir haben schon soviel probiert das ich um jeden noch so dämlichen Tipp dankbar bin.
Tommy