Domino 9 und frühere Versionen > Entwicklung

NotesItem mit Type Datum

<< < (2/2)

ata:
dateItem= dateTime.DateOnly

... du weist einem Feld den String zu - das geht nicht - mach das raus

doc.ArchEndTime = dateItem.LSLocalTime

ata

enny:
Wenn du New NotesItem  zum erzeugen verwendest kann leider nur ein Textfeld erzeugt werden! Hab das vorhin auch mal ausprobiert direkt den Typ sprich 1024 zu übergeben und dabei ist nämlich die Fehlermeldung gekommen das er nur mit dem Text umgehen kann. Probiers doch mal mit meiner Variante (siehe oben)

robertpp:
Ich hab s jetzt so einfach gelöst jetzt passt es!

   Dim ws As New NotesUIWorkspace
   Dim item1 As NotesItem  
   Dim doc As NotesDocument
   Dim uidoc As NotesUIDocument
   Set uidoc=ws.CurrentDocument  
   Set doc= uidoc.Document  
   

     
      Dim dateTime As NotesDateTime
     
      If doc.Status(0)= "4.) finished" Then
         
         Set datetime= New NotesDateTime( doc.ArchEndTime(0) )
         Set item1 = doc.GetFirstItem("ArchEndTime")
         
         If Not Isdate (item1) Then
            Call item1.Remove
            Set dateItem =  New NotesItem ( doc, "ArchEndTime",datetime)
            Call doc.Save(True, False)
         End If
         
      End If
robertpp

Navigation

[0] Themen-Index

[*] Vorherige Sete