Crystal Reports - RDC - AddCurrentRange - NoLowerBound Date

[TonySanta]

Hi,
I am programming in vbscript using the Report Designer Component (RDC) object model. In the code snippet below, I would like to know how to code the first date in the 'AddCurrentRange' when there is NoLowerBound. When I have both dates, it works fine. Please note I am using 9 (8 + 1) as my range info for no lower bound and include upper bound. Thanks, Tony.

' Set the parameters for Open Orders report, Export to PDF, and Print
set objCRRpt = objCRApp.openreport( rptfileOpenO )
objCRRpt.ParameterFields.GetItemByName("Date Range").AddCurrentRange ,CDate("02/28/2015"), 9
objCRRpt.ParameterFields.GetItemByName("Include Discounts").SetCurrentValue("Y")
objCRRpt.ParameterFields.GetItemByName("IncludeTE").SetCurrentValue("N")
objCRRpt.ParameterFields.GetItemByName("OrderStatus").SetCurrentValue("All")
objCRRpt.ExportOptions.DiskFileName = exportfileOpenO
objCRRpt.Export FALSE
objCRRpt.PrintOut FALSE,1, ,1,4