Domino 9 und frühere Versionen > ND6: Entwicklung

Datums wert in ein feld Setzen

<< < (3/3)

stussy:
hier ist er. (ich bin noch am testen :)  )

Dim nextDateTime As New NotesDateTime(gruendungsdatum)
Call nextDateTime.Adjustyear( 5 )


wenn ich statt "gruendungsdatum" "heute" nehme,gehts. Ist aber für
mein Vorhaben unrelevant

Glombi:

--- Zitat ---wenn ich statt "gruendungsdatum" "heute" nehme,gehts. Ist aber für
mein Vorhaben unrelevant

--- Ende Zitat ---
Das ist aber eine gewagte Behauptung  ;D

Also das funktioniert garantiert so nicht.

dim ws as new NotesUIWorkspace
dim uidoc as NotesUIDocument
dim doc as NotesDocument
set uidoc = ws.CurrentDocument
set doc = uidoc.Document

if uidoc.FieldGetText( "gruendungsdatum" ) <> "" then
Dim nextDateTime As New NotesDateTime( doc.gruendungsdatum(0) )
Call nextDateTime.Adjustyear( 5 )
doc.jubilaeum = nextDateTime.LSLocalTime
End If

So und nicht anders gehts.

Andreas

stussy:
vielen Dank. Das war´s.
Leider bin ich bei Datums-Berechnungen immer etwas unsicher und die
Notes Hilfe ist da auch nicht immer hilfreich.

Danke nochmal.

Navigation

[0] Themen-Index

[*] Vorherige Sete