Das Notes Forum

Domino 9 und frühere Versionen => ND6: Entwicklung => Thema gestartet von: LoNo007 am 08.04.10 - 10:52:41

Titel: Per Script für einen Datensatz eine Kategorie hinzufügen
Beitrag von: LoNo007 am 08.04.10 - 10:52:41

Hallo,

ich möche in der aktuellen Ansicht per Knopf dem aktiven Datensatz die Kategorie "Erledigt" hinzufügen. Folgendes Script sollte die bestehende Kategorie auslesen und um "Erledigt" ergänzen.
Leider wird keine Kategorie ausgelesen. Das Schreiben funktioniert.
Kann mir jemand helfen?

MfG

Oliver

Sub Click(Source As Button)
   Dim workspace As New NotesUIWorkspace
   Dim view As NotesUIView
   Dim uidoc As NotesUIDocument
   Dim category As Variant
   
   Set view = workspace.CurrentView
   category = view.CaretCategory
   
   Messagebox category
   
   Set uidoc = workspace.EditDocument      
   Call uidoc.Categorize( category & ";ERLEDIGT" )
   Call uidoc.Close
   
End Sub

Titel: Re: Per Script für einen Datensatz eine Kategorie hinzufügen
Beitrag von: Axel am 08.04.10 - 11:30:06

Das kann so auch nicht funktionieren.

Schau die in der Hilfe mal die Methode FieldAppendText aus der Klasse NotesUIDocument an.
Das sollte dir weiterhelfen.

Außerdem soltest du das Dokument nach der Änderung auch Speichern und nicht nur Schließen.


Axel

Titel: Re: Per Script für einen Datensatz eine Kategorie hinzufügen
Beitrag von: ascabg am 08.04.10 - 11:31:55

Hallo,

Warum unbedingt per Script?

Ein Agent mit "einfacher Aktion" - "Feldwert aendern" "Wert anhaengen"
(siehe Screenshot)
erledigt dieses doch genauso.


Andreas

Titel: Re: Per Script für einen Datensatz eine Kategorie hinzufügen
Beitrag von: LoNo007 am 08.04.10 - 12:07:17

Danke Axel, Andreas für die Hilfe.

@ Andreas: Der Tip mit der "einfachen Aktion" ist 100% das was ich brauchte! Geniale Ideen sind eben simpel  :o.

Nochmals Herzlichen Dank, Problem gelöst.  ;D ;D ;D

MfG

Oliver