DataTime type parameter

[TouristMB]

I am scheduling report and discovered problem with datetime parameter.
This sample from BusinessObjets does not work .

With reportInterface.ReportParameters

For j = 0 to numberParameters-1

.Item(j+1).CurrentValues.Clear

Set newParameter = .Item(j+1).CreateSingleValue

newParameter.Value = Parameters(j)

.Item(j+1).CurrentValues.Add newParameter

Next

End With

Any ideas?
Thanks