Domino 9 und frühere Versionen > ND6: Entwicklung

Kalendareintrag erstellen

<< < (3/3)

koehlerbv:
Da nimmst Du die DateNumber-Funktion.

Bernhard

Stefan Kleinschmidt:
Geburtstag im aktuellen Jahr:

Lotusscript:

Dim dtGeburtsdatum As Variant Dim nTag As Integer Dim nMonat As Integer Dim nJahr As Integer Dim dtGeburtstagDiesesJahr dtGeburtsdatum = CDate(StringMitDatum) ' oder bei NotesDateTime: dtGeburtsdatum = CDate(ndtDatum.Dateonly) nTag = Day(dtGeburtsdatum) nMonat = Month(dtGeburtsdatum) nJahr = Year(dtGeburtsdatum) dtGeburtstagDiesesJahr = DateNumber(nJahr, nMonat, nTag)

Formelsprache:

GeburtstagDiesesJahr := @Date(@Year(@Now); @Month(Geburtsdatum); @Day(Geburtsdatum));

Gruß,

Stefan Kleinschmidt

der sich mit diesem kleinen Posting hier mal vorstellen will.

koehlerbv:
Willkommen im Forum, Stefan!


--- Zitat von: Stefan Kleinschmidt am 15.02.07 - 15:46:39 --- nTag = Day(dtGeburtsdatum) nMonat = Month(dtGeburtsdatum) nJahr = Year(dtGeburtsdatum)
--- Ende Zitat ---
Anmerkung:
nJahr = Year (Today).
In Formelsprache hast Du es doch richtig gemacht  ;)

Bernhard

Navigation

[0] Themen-Index

[*] Vorherige Sete