rystal report wont show data

[kacebaza]

hi i've got proble with my code, crystal report wont show data here is my code "

Try


            Dim path1 As String = constring '" '' path
            '' for normal ADO Concept
            '' The current DataSource is an ADO

            '' change path of the database
            rpt.DataSourceConnections.Item(0). _
                SetConnection("", "" & path1 & "", False)
            '' if password is given then give the password
            '' if not give it will ask at runtime
            rpt.DataSourceConnections.Item(0).SetLogon("Admin", "")



            CrystalReportViewer1.SelectionFormula = "{mytable.id} =  '" & parform.txtid.Text & "'"
            CrystalReportViewer1.ReportSource = rpt

            CrystalReportViewer1.Refresh()

        Catch exp As CrystalDecisions.ReportSource.EnterpriseLogonException
            MsgBox(exp.Message)
        End Try