Icon Design Document - $Flags setzen

[pimpfling]

Hallo,

basierend auf dem folgenden Thema: http://atnotes.de/index.php/topic,17582.0.html
habe ich mir einen LS Agenten gebaut der mir bei einer DB die Start-Eigenschaft "Angegebene Rahmengruppe öffnen" aktivieren soll.
Leider scheint es da noch irgendwas zu geben was gesetzt werden muss.

Das Ergebnis der Print Ausgabe:

Vorher: J7hHZI

Nachher: FJ7hHZI

Code:

Code

Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument

Set db = session.CurrentDatabase   
Set doc = db.GetDocumentByID("FFFF0010")
Print "Vorher: " & doc.getitemvalue("$Flags")(0) 
If InStr(doc.getitemvalue("$Flags")(0), "F")Then
      Print "F ist schon drin"
Else
      tmp = "F" & doc.getitemvalue("$Flags")(0)
      Call doc.ReplaceItemValue("$Flags", tmp)	
      Call doc.Save (False, False) 
End If

Print "Nachher: " & doc.getitemvalue("$Flags")(0)

[pimpfling]

Achso, es funktioniert nicht.
Die DB steht immer noch auf "So anzeigen wie zuletzt vom Benutzer verlassen"

Weitere Infos habe ich hier gefunden: http://www-01.ibm.com/support/docview.wss?uid=swg21244071
Der DefaultFrameset ist richtig gesetzt.

Was könnte noch fehlen?

[dnotes]

Was heisst denn bei Dir - es funktioniert nicht??


Wenn das Feld "$DefaultFrameset" mit dem Namen des frames anglegt ist funktioniert es bei mir. Ansonsten wird ja einfach der erste verfügbare Frame genommen.

[pimpfling]

Funktioniert nicht bedeutret das die DB die Eigenschaft behält "So anzeigen wie zuletzt vom Benutzer verlassen"
Und nicht wie von mir gesetzt "Angegebene Rahmengruppe öffnen"

[dnotes]

Ich frag nur...weil bei Dir so eine Zeile im Code fehlt:
Call doc.ReplaceItemValue("$DefaultFrameset", "HauptFrame")   
Wäre aber nicht schlimm, Notes würde den ersten Frame nehmen.

Wie sieht´s mit der Berechtigung auf die DB aus??

[pimpfling]

Ich frag nur...weil bei Dir so eine Zeile im Code fehlt:
Call doc.ReplaceItemValue("$DefaultFrameset", "HauptFrame")   
Wäre aber nicht schlimm, Notes würde den ersten Frame nehmen.

Wie sieht´s mit der Berechtigung auf die DB aus??

Managerrechte sind vorhanden
Der DefaultFramset ist auf MailFS gesetzt. Sollte also gehen, habe das aber auch schon mit Call doc.ReplaceItemValue("$DefaultFrameset", "MailFS") probiert, kein Unterschied.
Scheint mir irgendeine Art von Cache-Problem zu sein.
Ichb habe zwischendurch den Notesclient neu gestartet. Blieb erstmal wie gehabt.
Dann haber ich beim letzten Reiter was geändert und siehe da beim Reiter mit der Rakete stand dann das was ich per LS Agent gesetzt hatte.

Evtl. muss man noch irgenein Refresh auf diese Eigenschaften machen?
Denn wenn ich in der GUI was anderes ändere und dann meine Änderugnen auch endlich auftauchen kann ich mir nur sowas vorstellen.

[pimpfling]

Ich frag nur...weil bei Dir so eine Zeile im Code fehlt:
Call doc.ReplaceItemValue("$DefaultFrameset", "HauptFrame")   
Wäre aber nicht schlimm, Notes würde den ersten Frame nehmen.

Wie sieht´s mit der Berechtigung auf die DB aus??

Managerrechte sind vorhanden
Der DefaultFramset ist auf MailFS gesetzt. Sollte also gehen, habe das aber auch schon mit Call doc.ReplaceItemValue("$DefaultFrameset", "MailFS") probiert, kein Unterschied.
Scheint mir irgendeine Art von Cache-Problem zu sein.
Ichb habe zwischendurch den Notesclient neu gestartet. Blieb erstmal wie gehabt.
Dann haber ich beim letzten Reiter was geändert und siehe da beim Reiter mit der Rakete stand dann das was ich per LS Agent gesetzt hatte.

Evtl. muss man noch irgenein Refresh auf diese Eigenschaften machen?
Denn wenn ich in der GUI was anderes ändere und dann meine Änderugnen auch endlich auftauchen kann ich mir nur sowas vorstellen.

War wohl Zufall, hqabs jetzt ein paar Mal durch probiert. Klappte nur das eine Mal. 
Also doch kein Cache Problem.

[pimpfling]

Wie immer gibt's ja bei Notes/Domino mehrere Wege um ans Ziel zu gelangen.
In diesem Falle geht auch ein load design -f mydb.nsf per Server Console um den Wert entsprechend automatisch zu setzen.