منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب - استفسار عن ليست بوكس مع داتا جريد فيو

[COLOR="#0000FF"]بسم الله الرحمن الرحيم
السلام عليكم و رحمة الله و بركاته[/COLOR]

عندي استفسار عن (Query) في قاعدة البيانات, و هو:
لدي قاعدة البيانات التالية:

[ATTACH=CONFIG]3034[/ATTACH]

و اريد عمل التالي:
واجهة (Form) تحتوي على التالي:
1- ليست بوكس (ListBox) عدد واحد (1) فقط, تحتوي على اسماء الاقسام/الدوائر.
2- داتاجريد فيو (DataGridView) تحتوي على جميع الموظفين الموجودين ضمن القسم/الدائرة المختار/ة من الـ (ListBox).

السؤال هو:
كيف أقوم بعمل الـ (Query) لجلب موظفين القسم/الدائرة المختار/ة و وضع المعلومات في الـ (DataGridView)؟

و أرجو توضحيها بالطريقتين:
1- الـ (Oledb).
2- الـ (SqlClient).

تحياتي.

وعليكم السلام ورحمة الله وبركاته
ارفق مثالك ليتم التعديل عليه

أخي الكريم, سؤالي كان واضح جداً. فهل من الضروري إرفاق المشروع الذي لم أكمله الى الان من أجل كود (Query) واحد فقط!!!!!!

تم حل المشكلة بنجاح و الحمدلله, و لا حاجة لإرفاق مثال Wink

السلام عليكم

تفضل

PHP كود :

Imports System.Data.SqlClient

Public Class Form1

    Private constr As String = "Data Source=.\SQLEXPRESS;Initial Catalog=Emp;Integrated Security=True;"
    Private mycon As New SqlConnection(constr)
    Private myadapter As New SqlDataAdapter()
    Private mytable As New DataTable()
    Private myset As DataSet
    Private emp As New List(Of Object)

    Private Sub connect(ByVal select1 As String)
        myadapter = New SqlDataAdapter(select1, mycon)
        myset = New DataSet()
        mycon.Open()
        myadapter.Fill(myset)
        mytable = myset.Tables(0)
        mycon.Close()

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        connect("select * from Emp_Tbl,EmpInfo_Tbl,Dep_Tbl where Emp_Tbl.ID=EmpInfo_Tbl.Info_EmpID and EmpInfo_Tbl.Info_Department=Dep_Tbl.ID")
        For i = 0 To mytable.Rows.Count - 1
            ListBox1.Items.Add(mytable.Rows(i)("Dep_Name").ToString())
        Next
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        connect("select * from Emp_Tbl,EmpInfo_Tbl,Dep_Tbl where Emp_Tbl.ID=EmpInfo_Tbl.Info_EmpID and EmpInfo_Tbl.Info_Department=Dep_Tbl.ID and Dep_Tbl.Dep_Name='" & ListBox1.Text & "'")
        DataGridView1.DataSource = mytable
    End Sub
End Class 

ملاحظة بسيطة
طريقة

Oledb ان تضع

Imports System.Data.OleDb
وكل Sql تبدل ب OleDb

hoob computer كتب :أخي الكريم, سؤالي كان واضح جداً. فهل من الضروري إرفاق المشروع الذي لم أكمله الى الان من أجل كود (Query) واحد فقط!!!!!!

أخي الكريم كلامي كان واضح جداً انا ماقلت لك ارفق المشروع فقط قلت ارفق مثال ليتم التعديل عليه ، وهذا لسرعة الاجابة سواء مني او من اي عضو آخر

مو معقول كل سوال يقومون الاعضاء بعمل أمثلة حسب المطلوب وحل المشكلة وإعلام السائل بالخطأ ،،،،

تسهيلاً للأعظاء وكسباً للوقت يقوم طالب المساعدة بإرفاق مثال بسيط يطلب طلبه ويقومون الاعضاء بالحل ....

على العموم الحمدلله حصلت حل لمشكلتك

مشكوووووووووووووووور على الاجابات من كل الاعضاء, شاكراً لكم جهودكم Smile

أخوية الغالي سجاد,
مشكور على الكود الي نزلته بمشاركتك, لكنه يختلف شوية عن الكود الي جان ابالي و الي لكيته بموقع اجنبي و كان يشتغل بكل نجاح وهو:

PHP كود :

SELECT        Emp_Tbl.*
FROM            Dep_Tbl INNER JOIN
                         EmpInfo_Tbl ON Dep_Tbl.ID = EmpInfo_Tbl.Info_Department INNER JOIN
                         Emp_Tbl ON EmpInfo_Tbl.Info_EmpID = Emp_Tbl.ID
WHERE        (Dep_Tbl.ID = @ListBox1.SelectedValue) 

تحياتي

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

hoob computer

حريف برمجة

hoob computer

hoob computer

Sajad

محمود اكرم

حريف برمجة

hoob computer

hoob computer