crystal reports

[kanuri1]

hi,
i had got a problem when iam using to show the crystal reports using an condition it was not working properly ,,,,,,
here my code is given below ,,,,,,
iam using sqlserver.....

Protected Sub search_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles search.Click

        Dim cryRpt As New ReportDocument
        cryRpt.Load("E:\guesthouse\CrystalReport.rpt")
        Dim crParameterFieldDefinitions As ParameterFieldDefinitions
        Dim crParameterFieldDefinition As ParameterFieldDefinition
        Dim crParameterValues As New ParameterValues
        Dim crParameterDiscreteValue As New ParameterDiscreteValue
        crParameterDiscreteValue.Value = Convert.ToInt32(sear.Text)
        crParameterFieldDefinitions = _
                               cryRpt.DataDefinition.ParameterFields
        crParameterFieldDefinition = _
                               crParameterFieldDefinitions.Item("bookingno")
        crParameterValues = crParameterFieldDefinition.CurrentValues
        crParameterValues.Clear()
        crParameterValues.Add(crParameterDiscreteValue)
        crParameterFieldDefinition.ApplyCurrentValues(crParameterValues)
        CrystalReportViewer1.ReportSource = cryRpt
        CrystalReportViewer1.RefreshReport()
    End Sub