تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
احتاج مساعدة في القريد فيو
#1
1)اريد عمل قريد فيو واحد من جدولين بينهم علاقه لاظهارهما معا في نفس القريد فيو
2)ايضا اريد عندما اضغط مثلا كليك على الحقل في القريد فيو تظهر البيانات مباشرة في التكست الموجوده في المشروع
الرد }}}
تم الشكر بواسطة:
#2
ارفق مثالك مختصر اسرع من عمله من جديد !

وابشر بالمساعدة
الرد }}}
تم الشكر بواسطة:
#3
دي قاعدة بيانات اكسس مكونه من جدولين
جدول الدكتور ويتكون : جدول الاقسام ويتكون من :
رقم الدكتور number رقم القسم number
اسم الدكتور text اسم القسم text
رقم القسم number

المهم وهناك علاقة بين الجدولين (رقم القسم وطبعا هو مفتاح رئيسي في جدول الاقسام , فرعي في جدول الدكتور (اي يجب تعبئته اولا في جدول الاقسام )

ولدي فورم الدكتور المطلوب عمل قريد فيو فيه
ويحتوي على
Txtid رقم الدكتور
Txtname اسم الدكتور
Txtdept رقم القسم
واريد ايضا اضافه اسم القسم في القريد فيو
يعني القريد فيو يحتوي على رقم الدكتور اسم الدكتور اسم القسم ويفضل الغاء رقم القسم ان امكن
وعندما اضغط كليك او دبل كليك على اي حقل مباشرة البيانات في الحقول تظهر في التكست الموجودة لدي
ماهو الكود المطلوب اضافته في القريد فيو او التكست لست ادري ؟؟؟؟؟كيف
الرد }}}
تم الشكر بواسطة:
#4
المرفق يحوي على المشروع


الملفات المرفقة
.rar   hospital22.rar (الحجم : 407.2 ك ب / التحميلات : 53)
الرد }}}
تم الشكر بواسطة:
#5
اول شي يجب وضع قريد فيو اخرى لأن القريد فيو الموجوده مربوطة بالجدول بالويزارد

اتفقنا تضع قريد فيو في الفورم ولتكن اسمها Datagridview2

ضع الكود التالي في زر

كود :
Dim dp As New OleDbDataAdapter("SELECT doctor.doc_ID, doctor.doc_name, department.dept_name, department.dept_no FROM department INNER JOIN doctor ON department.dept_no = doctor.dept_no", CONN)
        Dim ds As New DataSet

        dp.Fill(ds)

        DataGridView2.DataSource = ds.Tables(0)
        DataGridView2.Columns(3).Visible = False
        dp.Dispose()
حتى هنا يعرض المطلوب اللي طلبته في القريد رقم 2

علشان تختار سجل من القريد اللي عملنا ويعرض بيانات السجل في التكستات

ضع الكود التالي كماهو

كود :
Private Sub DataGridView2_CellMouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellMouseEventArgs) Handles DataGridView2.CellMouseClick
        If e.RowIndex = -1 Then Exit Sub

        Txtid.Text = DataGridView1.Item(0, e.RowIndex).Value
        Txtname.Text = DataGridView1.Item(1, e.RowIndex).Value
        Txtdept.Text = DataGridView1.Item(2, e.RowIndex).Value
        TextBox1.Text = DataGridView1.Item(3, e.RowIndex).Value
    End Sub
وخلاص ،، اسمحلي ما اقدر ارفع المثال بعد التعديل لأن الاصدار اللي عندي 2010 ما حيشتغل عندك ....
الرد }}}
تم الشكر بواسطة:
#6
ماعندك مشكلة ارفعه انا اقدر احوله الى 2008 عندي برنامج يحول
الرد }}}
تم الشكر بواسطة:
#7
تفضل اخي ....


الملفات المرفقة
.rar   hospital.rar (الحجم : 418.26 ك ب / التحميلات : 66)
الرد }}}
تم الشكر بواسطة:
#8
اشكرك جدا اخي
لك تحياتي
الله يوفقك ويوفقنا
الرد }}}
تم الشكر بواسطة:
#9
لدي طلب اخير بسيط استاذي الفاضل
هل استطيع التحديث في القريد فيو2 بعد عمليه الحفظ والتعديل والحذف لان البيانات لا تتحدث الا عندما اقفل المشروع وادخل مره اخرى اجدها تحدثت
كذلك اني قد مسحت القريد فيو1 لاني لست في حاجه لها
الرد }}}
تم الشكر بواسطة:
#10
عبدالعزيز2013 كتب :لدي طلب اخير بسيط استاذي الفاضل
هل استطيع التحديث في القريد فيو2 بعد عمليه الحفظ والتعديل والحذف لان البيانات لا تتحدث الا عندما اقفل المشروع وادخل مره اخرى اجدها تحدثت
كذلك اني قد مسحت القريد فيو1 لاني لست في حاجه لها

نعم يمكنك عملها كالتالي :

اعمل صب وليكن اسمه sub showdataingrid

ويتم وضع الكود اللي يعرض البيانات في القريد في الصب

وعند النقر على الزر ضع اسم الصب

وعند الحفظ او التعديل او الحذف ضع اسم الصب بدلاً من تكرار كتابة الكود في اكثر من حدث ،،،، مثال :

كود :
Sub showdataingrid()
        Dim dp As New OleDbDataAdapter("SELECT doctor.doc_ID, doctor.doc_name, department.dept_name, department.dept_no FROM department INNER JOIN doctor ON department.dept_no = doctor.dept_no", CONN)
        Dim ds As New DataSet

        dp.Fill(ds)

        DataGridView2.DataSource = ds.Tables(0)
        DataGridView2.Columns(3).Visible = False
        dp.Dispose()
    End Sub
في الزر اللي يعرض البيانات في القريد ضع الكلمة هذي :

كود :
showdataingrid
ايضاً بعد عملية الحفظ ضع الكلمة هذي وهكذا في اي حدث تريد :

كود :
showdataingrid
فقط ،،، وذلك لعدم كتابة كود عرض البيانات تكراراً
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  أريد مساعدة من فضلكم في زر الإضافة waidom 2 1,675 10-06-23, 12:53 PM
آخر رد: mahmoud mostafa 2023
  مساعدة من اخوتي برنامج مبيعات سوبرماركت التعامل مع اكثر من زبون في نفس الوقت Mokhtar-mako 1 1,309 16-01-21, 08:43 PM
آخر رد: moosa_alabri
  [سؤال] مساعدة في تحليل قاعدة بيانات مشتريات ومبيعات maw2321 1 2,653 09-10-20, 09:28 PM
آخر رد: ali.jamil27
  [كود] محتاج مساعدة في كود stiger 1 1,448 28-05-20, 06:44 AM
آخر رد: stiger
  مساعدة haider82 1 1,723 24-05-20, 07:07 AM
آخر رد: ابراهيم ايبو
Smile مساعدة في إنشاء مشروع شجرة العائلة Yassin246 1 1,716 13-05-20, 02:14 AM
آخر رد: Yassin246
  [SQL] انا احتاج للنسخ1 table في قاعدة بيانات 1 الى table1 في قاعدة بيانات2 في essamprog2020 1 1,573 19-04-20, 02:13 AM
آخر رد: asemshahen5
  مساعدة في تصميم قاعدة بيانات ادارة ساعات عمل الموظفين Rabeea Qbaha 6 3,869 06-06-19, 12:23 AM
آخر رد: elgokr
  مساعدة في كود عرض بيانات من جدولين samira20 1 2,332 18-04-19, 03:03 AM
آخر رد: حريف برمجة
  احتاج مساعدة بشأن الاكسس اسامه الهرماوي 2 1,681 17-04-19, 02:02 AM
آخر رد: new_programer

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم