Domino 9 und frühere Versionen > ND7: Entwicklung

Liste mit Datum speichern

<< < (4/6) > >>

Hatschi:
Hallo André,

du hast recht. Dein Code macht genau das was ich will. Vielen Dank für deine Geduld.

Warum ich da jetzt so herumgeirrt bin, kann ich ich vor lauter probiererei nicht mehr nachvollziehen. Denn mit dem LSLocalTime habe ich ja auch versucht zum Ziel zu kommen.

Auf jeden Fall habt ihr mir geholfen. Mein Problem ist gelöst und ich habe noch den "neuen" Befehl ArrayAppend kennengelernt.

Bernd


P.S: Wie wird das Thema auf erledigt gesetzt?

ascabg:
Ich glaube, in dem Du Deinen 1. Post nochmal oeffnest. Hier muesste das einstellbar sein.


Andreas

P.S.:
Schade, dass ich die Lorbeeren nun doch nicht bekomme  :'(

Hatschi:
Ohhhh Entschuldigung Andreas (ascabg),

ich habe Dein Codebespiel als funktionierende Vorlage genommen!


--- Zitat von: ascabg am 23.11.09 - 14:13:59 ---
--- Code: ---Dim doc As NotesDocument
Dim dtNew As New NotesDateTime("")
Dim varOld As Variant, varNew As Variant

Set doc = Source.Document
Call dtNew.SetNow

varOld = doc.GetItemValue("DateList")
varNew = Fulltrim(Arrayappend(varOld, dtNew.LSLocalTime))

Call doc.ReplaceItemValue("DateList", varNew)

--- Ende Code ---

--- Ende Zitat ---

Demnach gehören die Lorbeeren natürlich dir!
Nochmals vielen Dank.

Bernd

koehlerbv:
Warum das ganze so verkompliziert?

doc.DateList = Fulltrim (Arrayappend (doc.DateList, Now))

Bernhard

Hatschi:
Hallo Bernhard,

auf die Idee das so einfach zusammenzufassen bin ich noch nicht gekommen. 


Bernd

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete

Zur normalen Ansicht wechseln