Eine Zahl auf ein Datumsfeld aufaddieren (Script)

[OCS]

Hallo!

Ich versuche, auf ein Datumsfeld einen Wert aufzuaddieren; geht normalerweise mit der Funktion "Call dateTime.AdjustDay( 10 )". Hier würde die Zahl 10 zum Feld "dateTime" aufaddiert werden.

Das Datumsfeld, mit dem ich arbeite, ist aber vom Typ "Variant"; und deshalb geht es damit nicht. Ich habe versucht, das zu einem Datumfeld zu konvertieren (CDat), geht aber auch nicht. Es kommt immer die Fehlermeldung "Type Mismatch".

Hat jemand schon mal das gleiche Problem gehabt und ggfs. eine Lösung?!?

Vielen Dank im voraus!!!

[Semeaphoros]

Du musst den Wert einer Variablen vom Typ NotesDateTime zuweisen. Schau mal in der Designer-Hilfe unter diesem Begriff nach, es gibt Beispiele dafür. Wesentlich ist, dass Du ein

Dim DT as NotesDateTime

verwendest und dann diesem Objekt den Wert zuweisest (zB über LocalTime oder so).

[koehlerbv]

Ooops, das geht aber doch ganz einfach !
Wenn Dein Datumswert in einer Variant-Variablen gespeichert ist, kannst Du dieser einfachst per Addition einen Wert hinzufügen.

Dim vDate as Variant
...
vDate = doc.Datum (0)     'Das Feld Datum enthält als Wert den 10.08.2004
vDate = vDate + 10
doc.Datum = vDate          'Jetzt enthält das Feld Datum den Wert 20.08.2004

HTH,
Bernhard

[Semeaphoros]

Jo, solange es sich um ganze Tage handelt, bei anderen Manipulationen wird es schwieriger auf diesem Weg.

[OCS]

Hallo!

Vielen Dank für die Tips; es hat mit dem ersten funktioniert; habe es mit NotesDateTime gemacht und dann meiner Variablen zugewiesen; damit geht es.

[Semeaphoros]

Kannst Du bitte den Thread noch auf setzen?