Das Notes Forum

Domino 9 und frühere Versionen => ND6: Entwicklung => Thema gestartet von: Alexis am 17.02.06 - 15:50:04

Titel: Feldwerte ersetzen auch wenn Feld nicht vorhanden
Beitrag von: Alexis am 17.02.06 - 15:50:04

Hallo Forum,

beim Betreff tue ich mich schon schwer. Folgende Hürde:
Eine Anzahl selektierter Dokumente sollen ín einem Mehrfachwert-Feld einen zusätzlichen Wert erhalten. So weit kein Problem.

Set doc = coll.getfirstdocument
   Do Until doc Is Nothing
      Set Item = doc.GetFirstItem("Stage")
      Call item.AppendToTextList( Response$ )
      Call doc.Save( False, True )
      Set doc = coll.getnextdocument(doc)
   Loop

Nun sind aber einige Dokumente jungfräulich und besitzen das Feld noch nicht. Dass heißt ich muss mit New NotesItem das Feld erst definieren. Das beißt sich aber im Falle, dass das Feld bereits existiert, oder ???

Ich bitte um Rat.

Alexis

Titel: Re: Feldwerte ersetzen auch wenn Feld nicht vorhanden
Beitrag von: Thomas Schulte am 17.02.06 - 15:53:05

prüfen ob das Document ein item hat geht mit doc.hasitem

Titel: Re: Feldwerte ersetzen auch wenn Feld nicht vorhanden
Beitrag von: Alexis am 17.02.06 - 16:02:13

Danke!

Titel: Re: Feldwerte ersetzen auch wenn Feld nicht vorhanden
Beitrag von: Alexis am 17.02.06 - 16:34:26

Ich habe doch noch ein Problem:

Das Field Flag wird offensichtlich nicht auf SUMMARY gesetzt, (was immer das für eine Bedeutung hat).

Konsequenz: Im SELECT erscheinen jene Dokumente nicht, die ich durch Setzen des Feldes auswählen möchte?

Alexis

Titel: Re: Feldwerte ersetzen auch wenn Feld nicht vorhanden
Beitrag von: Axel am 17.02.06 - 16:39:54

Dann setz die IsSummary - Eigenschaft auf True.

Beispiel aus der Designer-Hilfe:

Code

Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim item As NotesItem
Set db = session.CurrentDatabase
Set doc = New NotesDocument( db )
Set item = New NotesItem _
( doc, "Topic", "I have something to say" )
item.IsSummary = True
' must specifically set this property
Call doc.Save( False, True )

Axel

Titel: Re: Feldwerte ersetzen auch wenn Feld nicht vorhanden
Beitrag von: Alexis am 17.02.06 - 16:44:54

Nochmals Danke.

Ihr seid super!

Alexis