Date Value

When run on the last line i get a error message “Type Mismatch”.I want to get the day value. can somebody tell me the solution , thank !

    Xm=Month(Y)

Xd=Day(Y)

Xy=Year(Y)

Xm1=Cint(Xm)+Cint(1)

Xd1=Cint(01)

XX=Cstr(Xm1)+"/"+Cstr(Xd1)+"/"+Cstr(Xy)

Dim Te As New NotesDateTime( XX )

Call Te.AdjustDay(-1)

    PP=Day(Te)

Subject: TRY: PP=Day(Te.LSLocalTime)

Subject: Date Value

pp=day(datenumber(Year(y),Month(y)+1,1)-1)

Subject: Date Value

Convert the vairable into date datatype

Dim Te As New NotesDateTime(cdat(XX ))

Regards

Nanda.

Subject: Date Value

Dear,

PP=Day(Te) → PP = Day(Te.DateOnly)

nhatnamnv@yahoo.com