[daniel50096230]

I had the following code to display crystal report based on the sql.

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
		
		conKk.Open()
	   
		Dim strReportPath As String = "C:\Documents and Settings\Chee Mun\Desktop\FYPvb\FYP\CrystalReport1.rpt"
		MessageBox.Show(strReportPath)
		Dim mySelect As SqlCommand

		mySelect = New SqlCommand("Select * from Song", conKk)

		Dim mySqlDataAdapter As New SqlDataAdapter(mySelect)

		Dim mydsSong As New DataSet

		mySqlDataAdapter.Fill(mydsSong, "Song")
		Dim objRpt As New ReportDocument
		objRpt.Load(strReportPath)

		objRpt.SetDataSource(mydsSong.Tables("Song"))
		CrystalReportViewer1.ShowRefreshButton = False
		CrystalReportViewer1.ShowCloseButton = False
		CrystalReportViewer1.ShowGroupTreeButton = False

		CrystalReportViewer1.ReportSource = objRpt
		CrystalReportViewer1.Refresh()
		conKk.Close()
	End Sub

But the problem occured in objRpt.SetDataSource(mydsSong.Tables("Song")),it stated that no tables is found but my database is having this table.

anyone could guide me?


I appreciate it.