Datumsvergleich mit Variant

[Jörg]

Hallo,

zur Zeit will mich Lotus irgend wie ärgern und ich komme mit den einfachsten Dingen net
klar....

Was ich machen möchte :

In einen Profildokument habe ich folgende Datumsfelder
Timestamp = Berechnet mit Format TT.MM.YYYY
Agent_Date = ohne Berechnung

Das Feld Agent_Date soll nun um 5 Tage addiert werden.
Im Forum wurde hier schon mehr mehrmals darüber diskutiert und der  Code sieht so aus:

Code

Dim Prof_Timestamp as Variant
Dim Prof_Agent as Variant

Prof_Timestamp = docuser.Timestamp(0)
Prof_Agent = docuser.Agent_Date(0)

Prof_Agent = Prof_Timestamp + 1

docuser.Agent_Date = Prof_Agent
Call docuser.Save(True,False)

Aber ich erhalte immer die Meldung Type missmatch in der Zeile
Prof_Agent = Prof_Timestamp + 1 und weiß nun ent warum.

Gruss Jörg

[koehlerbv]

TimeStamp enthält doch wohl keinen String, oder doch?

Bernhard

[Jörg]

Im Debugger sind die Felder wie folgt gefüllt "24.08.2008"


gruß Jörg

[koehlerbv]

Also String. Da brauchst Du Dich nicht zu wundern. Datumswerte speichert man nicht in Strings ebenso wenig wie Zahlen.

Bernhard

[Jörg]

Hi,

ok , kann ich den Wert konvertieren ohne hier die Notestime class zu verwenden???
Gruß Jörg