[أبووسم]

السلام عليكم

لدي مشروع بقاعدة بينانات (أكسس) تحتوي على 3 جداول و تم ربطها (لا أعلم عن صحة طريقتي)

عملت كود بحث و عند البحث يخرج لي نتائج جدول واحد فقط ، وانا اريد أن يخرج بيانات الجداول الثلاث .

شاكر و مقدر للجميع

[a.ahmed]

PHP كود :

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        InputLanguage.CurrentInputLanguage = InputLanguage.FromCulture(New Globalization.CultureInfo("AR"))
        'TODO: This line of code loads data into the 'MyData2017DataSet.Employees' table. You can move, or remove it, as needed. '
        Me.EmployeesTableAdapter.Fill(Me.MyData2017DataSet.Employees)
        View()
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Me.EmployeesBindingSource.Filter = "[Ename] LIKE '" & Me.TextBox1.Text.Trim & "%'"
        View()
    End Sub

    Private Sub EmployeesDataGridView_CellClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles EmployeesDataGridView.CellClick
        View()
    End Sub

    Private Sub View()
        Dim idCard As Integer = 0
        If EmployeesBindingSource.Position >= 0 Then
            idCard = CType(EmployeesBindingSource.List(EmployeesBindingSource.Position), DataRowView).Item("Idcadr")
        End If
        Me.EjazhTableAdapter.FillByIdCard(Me.MyData2017DataSet.Ejazh, idCard)
        Me.DorahTableAdapter.FillByIdCard(Me.MyData2017DataSet.Dorah, idCard)
        Me.EjazhDataGridView.ClearSelection()
        Me.DorahDataGridView.ClearSelection()
    End Sub

    Private Sub PictureBox1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox1.Click
        End
    End Sub

End Class 


[أبووسم]

اشكرك اخي الكريم على مساعدتك الطيبة

و لكن عند نقل الاكواد ظهر لي خطأين في الاسطر التالية

كود :

       Me.EjazhTableAdapter.FillByIdCard(Me.MyData2017DataSet.Ejazh, idCard)
       Me.DorahTableAdapter.FillByIdCard(Me.MyData2017DataSet.Dorah, idCard)

وسؤال لو تكرمت ، هل طريقتي في العلاقات بقاعدة البيانات صحيحة ؟    

[a.ahmed]

PHP كود :

Open MyData2017DataSet

Ejazh>Add>Query: FillByIdCard
SELECT * FROM Ejazh WHERE (IdCardE = ?)

Dorah>Add>Query: FillByIdCard
SELECT * FROM Dorah WHERE (IdCardD = ?) 


[أبووسم]

(22-10-17, 02:41 PM)a.ahmed كتب :

PHP كود :

Open MyData2017DataSet

Ejazh>Add>Query: FillByIdCard
SELECT * FROM Ejazh WHERE (IdCardE = ?)

Dorah>Add>Query: FillByIdCard
SELECT * FROM Dorah WHERE (IdCardD = ?) 


ما زالت المشكلة مستمره اخي الكريم

أعتذر على إزعاجك