Domino 9 und frühere Versionen > Entwicklung

NotesDateTime (Script)

(1/2) > >>

Don Pasquale:
Hallo Leute,

ich möchte in einer Maskte dem User einen Terminvorschlag machen und ein Datumsfeld mit einem Datum 1 Woche im voraus belegen.

Aber bereits folgendes klappt bei mir nicht :

Dim nextDateTime As NotesDateTime
Set nextDateTime = New NotesDateTime( "Today" )
Call nextDateTime.AdjustDay( 7 )


nextDateTime bleibt 00.00.0000

von dem Adjust ganz zu schweigen.

Wo liegt der Denkfehler?

Ciao

Don Pasquale

ata:
... ich würde das mit Formel machen: @Adjust(.....)
... ansonsten konvertiere das heutige Datum zu Double, zähle 7 dazu und wandle die Zahl wieder zu einem Datum - in meiner Lib zum DateHandling gehe ich teilweise den gleichen Weg...

ata

klaussal:
... oder mit "evaluate"....


BeispieL:

                Dim eval  As Variant
   Dim varReturn As Variant
   Dim strRolle As String
   Dim subString As String
   
   On Error Goto userHasRoleError
   Set db = session.currentDatabase
   
   strRolle = Rolle
   eval = Evaluate("@UserNamesList")
   varReturn = Arraygetindex( eval, strRolle)
   
   If Isnull(varReturn)  Then
      'Messagebox "nix Gefunden"
      userHasRole = False
   Else
      'Messagebox "gefunden"
      userHasRole = True
   End If

Don Pasquale:
???

klaussal:
... in der evaluate-zeile arbeitet man dann mit "adjust"... ;)

mein teil war eben nur ein beispiel.

Navigation

[0] Themen-Index

[#] Nächste Seite