Domino 9 und frühere Versionen > Entwicklung

von Datum abziehen

(1/2) > >>

robertpp:
Ich hab eine Function und möchte in dieser von dateTmp nDayofWeek abziehen nur bekomm ich da immer eine Fehler.

Wenn ich Dim dateTmp As NotesDateTime lasse dann bekomm ich auch bei dateTmp= Datenumber(nYear, 4, 1) einen Fehler.
Ich weiß auch das man das nicht einfach abziehen kann ich weiß aber nicht wie es geht.
Kann mir da bitte jemand helfen.



Function GetDSTDates(nYear As Integer, dateStart As NotesDateTime, dateEnd As NotesDateTime)
   
   Dim nDayofWeek As Integer
'   Dim dateTmp As NotesDateTime
   
   GetDSTDates = True
   On Error Goto GetDSTDatesErr
   'Wochentag des 1 April bestimmen
   dateTmp= Datenumber(nYear, 4, 1)
   nDayofWeek = Weekday(dateTmp)
      dateStart = dateTemp - nDayofWeek
   
   Exit Function
GetDSTDatesErr:
   GetDSTDates = False
End Function

robertpp:
Ich hab in der Hilfe ein
 :)
Call dateTime.AdjustDay( -x )

gefunden nur dann müsste mein dateTemp ein NotesDateTime sein aber da gibt es ja auch ein problem ???

Semeaphoros:
Kannst Du Dich mal etwas klarer ausdrücken? Ich verstehe nix, insbesondere, was für ein Problem es denn da geben sollte. In der Hilfte steht unter NotesDateTime durchaus, wie das funktioniert und wie man ein solches Objekt erzeugt und mit dem richtigen Datum "befruchtet".

robertpp:
Ich möchte einfach haben dass:

dateTmp= Datenumber(nYear, 4, 1)
nDayofWeek = Weekday(dateTmp)

das ich diese Formel:
dateStart = dateTemp - nDayofWeek

realsieren kann.

Semeaphoros:
dateStart = dateTemp

call dateStart.AdjustDay ( - nDayofWeek )

Whats the problem?

Navigation

[0] Themen-Index

[#] Nächste Seite