+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] استدعاء معلومات جدولين عن طريق المفتاح الاجنبي (/showthread.php?tid=34559)
استدعاء معلومات جدولين عن طريق المفتاح الاجنبي - ali saud - 02-05-20
بسم الله الرحمن الرحيم
رمضان كريم عليكم وعلى الامة العربية
وحفظكم الله من كل مكروه
*****************************************************************
انا كنت شغال على الاكسس وشغال بشكل احترافي والحمد لله
لكن حبيت اطور من نفسي رحت شغال فيجول // وهنا بدات الصدمه لي بسبب اختلاف بيئة العمل
عندي مشكل بصراحة وصلت لمرحلة الياس في حلها وكلي امل فيكم
لكن حبيت اطور من نفسي رحت شغال فيجول // وهنا بدات الصدمه لي بسبب اختلاف بيئة العمل
عندي مشكل بصراحة وصلت لمرحلة الياس في حلها وكلي امل فيكم
عندي جدولين
الاول اسمه Info خاص بمعلومات المرضى
الجدول الثاني اسمه Reviews وفيه زيارات المرضى ونوع الزيارة وتاريخ الزيارة
بينهم علاقة
ID >>>>>IDD
لما اقوم باستدعاء بيانات المريض وكما في الصورة
يوجد زر اسمه زيارة جديدة
اثناء الضغط علية يخرج لي فورم اخر
لكن المشكلة يقوم بجلب زيارات وتواريخ جميع المرضى
كما في الصوره
المطلوب
لما اقوم بتحديد مريض جديد والضغط على زر
زيارة جديدة
يفتح الفورم الثاني
ويعرض زيارات المريض المحدد فقط
ويعرض زيارات المريض المحدد فقط
والسلام عليكم
RE: استدعاء معلومات جدولين عن طريق المفتاح الاجنبي - aljzazy - 02-05-20
ضع الكود لنراه
اعتقد المشكلة بجملة جلب البيانات يجب ان تحدد رقم المريض الذي تريد جلب بياناته للداتاجرد فيو
فانت تجلب جميع بيانات المرضى وليس المريض الذي تريد اضافة زيارة جديدة له
RE: استدعاء معلومات جدولين عن طريق المفتاح الاجنبي - ali saud - 02-05-20
شكرا لاهتمامك بالموضوع
سبق وان قلت اني جديد على الفيجول
اي ان الكود الذي وضعته بالزر فقط اظهار الفورم
اما بحدث تحميل الفورم
وضعت تحميل معلومات الجدول الخاص بالزيارات
da = New OleDbDataAdapter(" select * from Reviews ", con)
da.Fill(dt)
في فورم الزيارات
وهذا في زر الاختيار في الفورم الاول
If ID.Text = "" Or age.Text = "" Then
MsgBox("يرجى اختيار المريض")
Return
Else
Visits.Show()
End If
RE: استدعاء معلومات جدولين عن طريق المفتاح الاجنبي - aljzazy - 02-05-20
ضع الكود الخاص بتحميل البيانات يجب ان تضع فيه شرط بدلالة رقم المريض
وان شاء الله بنساعدك
بالنسبة لتحميل البيانات يجب ان تكون بحدث الزر الخاص بفتح الشاشة
RE: استدعاء معلومات جدولين عن طريق المفتاح الاجنبي - ali saud - 02-05-20
حلو يعني تحميل البيانات بيكول بزر فتح الفورم
طيب كيف بدي اكتب الشرط حسب ID
RE: استدعاء معلومات جدولين عن طريق المفتاح الاجنبي - aljzazy - 02-05-20
عندك برنامج anydesk
RE: استدعاء معلومات جدولين عن طريق المفتاح الاجنبي - ali saud - 02-05-20
ثواني بيكون جاهز
RE: استدعاء معلومات جدولين عن طريق المفتاح الاجنبي - aljzazy - 02-05-20
كود :
(" select * from Reviews where id="& ID.Text &"", con)