Whut I try to do here I trying to get information based on range of date in order to display on CR 10. The thing is how am i going to declare in selection formula?Below is my code..plz anyone help me...



Code:

Dim crApp As CRAXDRT.Application
        Dim Report As CRAXDRT.Report
        Dim strSelectionfrm As String
        Set crApp = New CRAXDRT.Application
        Set Report = crApp.OpenReport("C:\Program Files\Microsoft Visual Studio\VB98\Projects\LeaveApp\LeaveForm4.rpt")



Report.Database.Tables(1).SetLogOnInfo "SQL", "tebrauteguh", "sa", "sa"
        
        strSelectionfrm = "{tblLeaveApp.EmpNo}='" & ndEmpNoView & "'and {tblLeaveApp.Ldate}- {tblLeaveApp.Fdate}='" & ndDays & "'" '-->I try to select from range
       
        Report.RecordSelectionFormula = strSelectionfrm
        Report.DiscardSavedData
        Form9.CRV.ReportSource = Report
        Form9.CRV.ViewReport
        
        Form9.Show
        Me.Hide
        Me.MousePointer = vbNormal