Adjust date to 7-day calendar week

[gem28]

Hi!
I've been trying to get the due date of the document base on the field CreateDate which, by default, has "Today" value. With lotusscript, i used the AdjustDay function. It was working fine until I place the value in the field. I got an error "Type Mismatch" plus, it does not display the correct date value in the dueDate field.

The code:

Dim dDate As New NotesDateTime(doc.CreateDate(0))
Call dDate.AdjustDay(+8)

Dim dts As String
dts = Format(dDate,"dd mmmm yyyy") -->> i get the error here.
Call source.FieldsetText("dueDate",dts)

Please, please help. Thanks so much!

tin

 

[pmonett]

Your variable dDate is of type Date, and your variable dts is of type String.
In order to correct the error, you need to convert dDate to String, or use a different property of dDate, for example DateOnly which returns a String value.

Pascal.


I've got nothing to hide, and I'd very much like to keep that away from prying eyes.

 

[Troodos]

Try this:

dts = Format$(dDate.LSLocalTime,"dd mmmm yyyy")

Brgds,

TrooDOS