+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : السلام عليكم .... ارجوا المساعدة (/showthread.php?tid=19019)
الصفحات:
1
2
السلام عليكم .... ارجوا المساعدة - محمد بوقزاحة - 29-01-17
السلام عليكم ورحمة الله وبركاته....
انا عندي ثلاثة جدول وتحتوي على مجموعة من السجلات
اريد مطابقة حقل الاسم في كل من الجدول1 مع الجدول2 مع الجدول3
اذا كان فيه اسماء مطابقة مع بعضها يظهر الاسماء في داتا قريد فيو او ليست بوكس ... المهم .... معرفة الاسماء المطابقه مع بعضها المجسلة في الجداول جدول1 جدول2 جدول3
////
ارجوا ان تكون الفكرة وصلت
ارجوا المساعده في اسرع وقت
RE: السلام عليكم .... ارجوا المساعدة - مساعدة - 29-01-17
السلام عليكم
تفضل الاستعلام، عليك باضافة الأعمدة التي تريدها في سطر SELECT مع الاشارة لاسم الجدول الموجود فيه
كود :
SELECT Table1.name, Table1.col2, Table2.col5, Table3.col8
FROM Table1
INNER JOIN Table2
ON Table1.name = Table2.name
INNER JOIN Table3
ON Table2.name = Table3.name
WHERE Table1.name = @nameعادة يوجد فيه الاسم مع تفاصيل بياناته الشخصية، والجداول الأخرى تحتوي عمود تشير برقم id بالجدول الأول
وهذا المتبع في قاعدة بيانات مثل جدول الموظفين وجدول الانجازات الخ...
تم تصحيح الاستعلام
RE: السلام عليكم .... ارجوا المساعدة - محمد بوقزاحة - 30-01-17
مشكور اخي الفاضل ...
يا ريت لو تشرح الكود اكثر بالتفصيل
RE: السلام عليكم .... ارجوا المساعدة - محمد بوقزاحة - 30-01-17
لم يشتغل الكود
RE: السلام عليكم .... ارجوا المساعدة - مساعدة - 30-01-17
ضع مشروعك.
RE: السلام عليكم .... ارجوا المساعدة - محمد بوقزاحة - 30-01-17
السلام عليكم ورحمة الله
تفضل اخي الكريم هذا هو المشروع وجزاك الله كل خير عني وعن كل من يستفيد
(30-01-17, 11:52 AM)مساعدة كتب : ضع مشروعك.
RE: السلام عليكم .... ارجوا المساعدة - مساعدة - 30-01-17
تفضل الكود لوضع النتيجة في ليست بوكس
كود :
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
Dim sql As String =
"SELECT kk.name FROM (kk INNER JOIN mash ON kk.name = mash.name) INNER JOIN MTM ON mash.name = MTM.name_1 where kk.name=?"
Dim DataAdapters As New OleDbDataAdapter(sql, con)
DataAdapters.SelectCommand.Parameters.AddWithValue("@name", TxTSerch.Text.Trim)
Dim DT As New DataTable
DataAdapters.Fill(DT)
For Each r As DataRow In DT.Rows
ListBox1.Items.Add(r.Item("name"))
Next
End SubRE: السلام عليكم .... ارجوا المساعدة - محمد بوقزاحة - 30-01-17
اخي الكريم هل نفذت الكود في المشروع اذا نفذت الكود على المشروع ممكن ترفقه لان لم يشتغل الكود
السلام عليكم اخي بارك الله فيك وجزاك الله كله خير
اخي الاسماء في الجداول الثلاثه كثييره جداً
كووود ..... يبحث في الجداول الثلاثه ويخرج الاسماء المتكرره في الجداول الثلاثة ويظهر الناتج في ليست بوكس
RE: السلام عليكم .... ارجوا المساعدة - محمد كريّم - 31-01-17
طريقة أخرى ممكن تعمل
كود :
select *
from TableA
where exists (
select 1
From TableB
where TableA.A = TableB.A
)
and
exists (
select 1
From TableC
where TableA.A = TableC.A
)RE: السلام عليكم .... ارجوا المساعدة - محمد بوقزاحة - 31-01-17
السلام عليكم اخي الكريم
ممكن تنفذ الكود عندك في المشروع وترفقه
//////////////////
المطلوب هو معرف الاسماء المتكرره في الجداول الثلاثه من البحث عنها بالاسم بالوحد
///////////////////
هل ممكن نفعل ذلك عن طريق DataGridView
كود يقوم بقراءة الاسماء في Columns
ويطابقه في الجداول الاخرى
>>>> مجرد فكره <<<<<