Domino 9 und frühere Versionen > ND8: Entwicklung

If Abfrage falsch

<< < (3/4) > >>

Tode:
Tippfehler ? Oder steht das wirklich so da:

Vaktdat   "24.02.2012"    Variant
VErindat   24.02.2012      Variant

Die beiden Werte sind also NICHT gleich...

koehlerbv:
DateOnly gibt ja auch einen String zurück!

vaktdat = Today ist kürzer - und korrekt!

Bernhard

PS: Und richtig - And ist LS,  das Pendant in Formelsprache.

wittmann_franz:
Es bleibt spannend.... >:(

Jetzt wird der code in der If Abfrage gar nicht mehr gezogen. Bekomme also auf dnum den Wert 0. Kann im Debuger auch nachvollzogen werden. Er springt immer gleich auf EndIf.

Screenshots vom Debugger, siehe Anhänge.

wittmann_franz:
ach so ja, und so sieht das Script jetzt aus:

   Dim session As New NotesSession
   Dim db As NotesDatabase
   Dim view As NotesView
   Dim doc As NotesDocument
   Dim dNum As Double
   Dim vaktdat As Variant
   Dim vErinDat As Variant
   Dim sErinJa As String
                  
   Set db = session.Currentdatabase
   Set view = db.GetView ("AnwendungenKopf")
   vaktdat = Today
         
   Set doc = view.Getfirstdocument()
   While Not (doc Is Nothing)
      sErinJa = doc.App_LIC_Erinnerung_JaNein(0)
      vErinDat =  doc.App_Lic_Erinnerung_Dat(0)
      If serinJa <> "Ja" and vErinDat <> vaktdat Then
         dNum = dNum +1
         Print "Hallo"            
      End If   
      Set doc = view.Getnextdocument(doc)   
   Wend
   Print "Es ist / sind " & dNum & " Dokumente verarbeitet worden."

koehlerbv:
serinJa ist lt. Debugger "Ja", wie soll er da in die Schleife gelangen?

Bernhard

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete