how to dislay two tables in crystal report?

2019-09-05 20:06发布

问题:

i'm stuck in displaying the fields two tables in crystal reports. i'm trying to code it manually but this code wont work. it works only one table to display i think.

here is my code:

''''''''''''''''connection to database''''''''''''''''''''''''''''''''''
connectionsrvr = New MySqlConnection("server=localhost;userid=root;password=;database=ticketing_system;")

    connectionsrvr.Open()

    If connectionsrvr.State = ConnectionState.Closed Then
        MsgBox("Cannot connect to server")
    End If
''''''''''''''''''''''''''''''''''''''''''''''''''''
Dim ds As New DataSet
        Dim sql As String

        sql = "SELECT complaint.*,errordesc.* FROM complaint,errordesc WHERE status='finished'"
        Dim dscmd As New MySqlDataAdapter(sql, connectionsrvr)
        dscmd.Fill(ds, "complaint")


        connectionsrvr.Close()

        Dim objret As New CrystalReport1
        objret.SetDataSource(ds.Tables(0))

        CrystalReportViewer1.ReportSource = objret
        CrystalReportViewer1.Refresh()