[Rabeea Qbaha]

السلام عليكم 

قمت بتصميم فاتوره للصيانه وكل شي ماشي كشخ

اقوم بجلب بيانات الصيانة عن طريق ال data source 

الجدول الاول عباره عن الجدول المخزن به معلومات الصيانة phone_fix

والجدول ال ٢  SettingSys هو جدول فيه معلومات المنشئه من الاسم رقم الهاتف الموقع الى اخ ...

قمت بجلب الجداول ال ٢ من ال data source في ال dataset 

وقمت بوضع كل شئ في المكان المناسب، عند التشغيل واستدعاء ال report 
تظهر معلومات الصيانة فقك بدون المعلومات من جدول SettingSys

هذا الكود المستعمل

PHP كود :

Dim ID As String = GV.SelectedRows(0).Cells(0).Value

        If Conn.State = ConnectionState.Closed Then
            Conn.Open()
        End If

        SQLHistory = "SELECT * FROM phone_fix WHERE ID = @ID"
        Dim cmd As New OleDbCommand(SQLHistory, Conn)
        cmd.Parameters.AddWithValue("@ID", ID)


        DataSet_phone_fix.Clear()

        Dim DataAdapterInvoices As New OleDbDataAdapter(cmd)
        DataAdapterInvoices.Fill(DataSet_phone_fix, "phone_fix")

        Conn.Close()

        Dim dataset_sett As New DataSet
        If Conn.State = ConnectionState.Closed Then
            Conn.Open()
        End If

        Dim cmd2 As New OleDbCommand("SELECT * FROM SettingSys WHERE ID = @ID", Conn)
        cmd2.Parameters.AddWithValue("@ID", "1")

        dataset_sett.Clear()

        Dim DataAdaptersetti As New OleDbDataAdapter(cmd2)
        DataAdaptersetti.Fill(dataset_sett, "SettingSys")

        Conn.Close()

        Dim rep As New Fix_phone_bill
        rep.SetDataSource(DataSet_phone_fix)
        rep.SetDataSource(dataset_sett)

        Dim frm As New FormPrint
        frm.CrystalReportViewer1.ReportSource = rep
        frm.CrystalReportViewer1.LogOnInfo(0).ConnectionInfo.Password = "123"
        frm.ShowDialog()