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

السلام عليكم اخوتي الاحباب

عندي فورم فيه 2 داتا جريد فيو

الاولي : يتم فيها عرض تحاليل المريض وبالتالي ممكن المريض يظهر اكثر من مره

اريد عند الضغط علي البوتن تظهر نفس البيانات السابقه من نفس الجدول ولكن بدون تكرار وتوضع البيانات في الداتا جريد الثانيه

ارفقت صوره لتوضيح الامر اكثر

[attachment=23683]

وده الكود المستخدم لملء الداتا جريد الاولي

كلمة : DISTINCT قبل العامود لمنع تكرار النتيجة .

(17-12-19, 05:10 AM)Emam emam كتب : [ -> ]السلام عليكم اخوتي الاحباب

عندي فورم فيه 2 داتا جريد فيو

الاولي : يتم فيها عرض تحاليل المريض وبالتالي ممكن المريض يظهر اكثر من مره

اريد عند الضغط علي البوتن تظهر نفس البيانات السابقه من نفس الجدول ولكن بدون تكرار وتوضع البيانات في الداتا جريد الثانيه

ارفقت صوره لتوضيح الامر اكثر



وده الكود المستخدم لملء الداتا جريد الاولي

PHP كود :

Dim dt As New DataTable
        Dim da As New SqlDataAdapter
        Dim searchDate1 As Date = DateTimePicker1.Value
        Dim searchDate2 As Date = DateTimePicker2.Value.AddDays(1)
        dt.Clear()
        da = New SqlDataAdapter("select [Patient_Code],[RegistrationDate],[ResultDate],
            [PatientName] from Analysis_Table WHERE 
            ResultDate >= '" & searchDate1.Year & "/" & searchDate1.Month & "/" & searchDate1.Day & "'
            and ResultDate <= '" & searchDate2.Year & "/" & searchDate2.Month & "/" & searchDate2.Day & "'", connSQL)
        da.Fill(dt)
        DataGridView1.DataSource = (dt) 


راجع الرابط دة فية كل انواع الاستعلامات

https://www.w3schools.com/sql/

(17-12-19, 03:17 PM)asemshahen5 كتب : [ -> ]

PHP كود :

    Dim dt As New DataTable
    Dim da As New SqlDataAdapter
    Dim searchDate1 As Date = DateTimePicker1.Value
    Dim searchDate2 As Date = DateTimePicker2.Value.AddDays(1)
    dt.Clear()
    da = New SqlDataAdapter("select DISTINCT[Patient_Code],[RegistrationDate],[ResultDate],
        [PatientName] from Analysis_Table WHERE 
        ResultDate >= '" & searchDate1.Year & "/" & searchDate1.Month & "/" & searchDate1.Day & "'
        and ResultDate <= '" & searchDate2.Year & "/" & searchDate2.Month & "/" & searchDate2.Day & "'", connSQL)
    da.Fill(dt)
    DataGridView1.DataSource = (dt) 


كلمة : DISTINCT قبل العامود لمنع تكرار النتيجة .

اعتزر  عن التاخير في الرد
ولكن يعجز لساني عن شكرك اخي عاصم  لما تقدمه من مساعده لي ولكل من يطلب المساعده 
بارك الله فيك وجعله الله في ميزان حسناتك

---

(17-12-19, 03:21 PM)محمد اسماعيل كتب : [ -> ]

(17-12-19, 05:10 AM)Emam emam كتب : [ -> ]السلام عليكم اخوتي الاحباب

عندي فورم فيه 2 داتا جريد فيو

الاولي : يتم فيها عرض تحاليل المريض وبالتالي ممكن المريض يظهر اكثر من مره

اريد عند الضغط علي البوتن تظهر نفس البيانات السابقه من نفس الجدول ولكن بدون تكرار وتوضع البيانات في الداتا جريد الثانيه

ارفقت صوره لتوضيح الامر اكثر



وده الكود المستخدم لملء الداتا جريد الاولي

PHP كود :

Dim dt As New DataTable
        Dim da As New SqlDataAdapter
        Dim searchDate1 As Date = DateTimePicker1.Value
        Dim searchDate2 As Date = DateTimePicker2.Value.AddDays(1)
        dt.Clear()
        da = New SqlDataAdapter("select [Patient_Code],[RegistrationDate],[ResultDate],
            [PatientName] from Analysis_Table WHERE 
            ResultDate >= '" & searchDate1.Year & "/" & searchDate1.Month & "/" & searchDate1.Day & "'
            and ResultDate <= '" & searchDate2.Year & "/" & searchDate2.Month & "/" & searchDate2.Day & "'", connSQL)
        da.Fill(dt)
        DataGridView1.DataSource = (dt) 


راجع الرابط دة فية كل انواع الاستعلامات

https://www.w3schools.com/sql/

الف شكر اخي محمد اسماعيل علي الرابط الجميل ده
رابط ممتاز واستفدت منه كثير بارك الله فيك

الحمد الله و الشكر الله رب العالمين .