+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] جلب بيانات معينة بدلالة المعرف (Id) (/showthread.php?tid=25142)
جلب بيانات معينة بدلالة المعرف (Id) - ibrahimmakhool - 29-05-18
السلام عليكم ورحمة الله وبركاته .... ورمضان كريم
اول شي انا مبتدى في فيجوال بيسك وارجو منكم مساعدتي اذا امكن.
انا اعمل على مشروع عيادة طبية ولكن واجهتني مشكلة وهي
بعد ادخال بيانات المريض الاساسية في الفورم الاول اريد ان افتح نافذة ثانية للمختبر لادخال التحاليل الطبية للمريض عن طريق رقم المريض الذي تم حفظه (استدعاء بيانات المريض عن طريق الرقم في الفورم الخاص بالمختبر وادخال النتائج )
ارجو المساعدة....
RE: ارجو المساعدة - elgokr - 29-05-18
وعليكم السلام ورحمة الله وبركاته
بخصوص كود فتح فورم اخر
كود :
Form2.show()بخصوص نقل قيمة محددة مثلاً
textbox1.text
الموجود فى Form1 الى Form2
يا تاتى فى زر فتح Form2 وتكتب التالى اسفل كود فتح الفورم
كود :
Form2.textbox1.text = textbox1.textاو انك تاتى فى لود Form2 وتكتب التالى
كود :
textbox1.text = Form1.textbox1.textما تم ادراجه هو فكرة الطريقة
ويعتمد نقل البيانات او النسخ اذا كان من خلال الاستعلام أو قيم ثابتة
تحياتى لك
وتمنياتى لك التوفيق
RE: ارجو المساعدة - Abu Ehab - 29-05-18
السلام عليكم
الاخ elgokr l : ما علاقة تكست بووك بالـــــ Id للسجل المدخل حديثا ؟؟
أساسا بيتم توليد Id بعد الحفظ ولا يتم ادخاله يدوي ..
اطيب شوف يا صديقي :
أذا كنت بتسخم العجووز Ado.Net فأنت من خلال جمله sql هات Last Id
واذا كنت بتتعامل مع الرائعه LINQ TO SQL أو Ef مباشرة الاوبحكت بيرجع بالـــId
يعطيكم العافية
RE: ارجو المساعدة - ibrahimmakhool - 29-05-18
مشكورين لكن القصد مما أريده هو اظهار جميع البيانات بمجرد ادخال ID ..مع العلم انا استخدم VB 2010 وقاعدة بيانات اكسس
RE: جلب بيانات معينة بدلالة المعرف (Id) - elgokr - 29-05-18
(29-05-18, 03:16 AM)Abu Ehab كتب : السلام عليكم
الاخ elgokr l : ما علاقة تكست بووك بالـــــ Id للسجل المدخل حديثا ؟؟
أساسا بيتم توليد Id بعد الحفظ ولا يتم ادخاله يدوي ..
اطيب شوف يا صديقي :
أذا كنت بتسخم العجووز Ado.Net فأنت من خلال جمله sql هات Last Id
واذا كنت بتتعامل مع الرائعه LINQ TO SQL أو Ef مباشرة الاوبحكت بيرجع بالـــId
يعطيكم العافية
وعليكم السلام ورحمة الله وبركاته
اهلاً اخى Abu Ehab
ما العلاقة : العلاقة هنا ما هى الا تشبيه
حيث ان الاخ الكريم ibrahimmakhool سيقوم بعمل استعلام
من خلال ID الذى قام بكتابته فى textbox ليقوم من بعد ذلك الاستعلام
وكما وضحت فى الاسطر التالية فى التعليق لسابق
إقتباس :ما تم ادراجه هو فكرة الطريقة
ويعتمد نقل البيانات او النسخ اذا كان من خلال الاستعلام أو قيم ثابتة
بمعنى ان كود الاستعلام سيتم فى Form2 ولكن بحاجة الى قيمة فلتر الاستعلام
الذى يتواجد فى textbox فى منطقة Form1 فكيف ارسال قيمة ID المدخلة يدوياً
الى كود الاستعلام الذى يتواجد فى Form2
او العكس
بعد الانتهاء من عملية الاستعلام من ID فى الـ Form1
يريد تحويل نتائج الاستعلام الى Form2 ليعرض داخله
اتمني ان يكون العلاقة هنا وضحت
(29-05-18, 03:19 AM)ibrahimmakhool كتب : مشكورين لكن القصد مما أريده هو اظهار جميع البيانات بمجرد ادخال ID ..مع العلم انا استخدم VB 2010 وقاعدة بيانات اكسس
ارجع الى ردي السابق مع مراجعة شرح العلاقة هنا بالاعلى
وان الامور تعقدت معك والفكرة لم تصل لك بعد وكيية بناء الكود
ارفق نسخة من المشروع
لاتمام عمل الكود بناءاً على بناء مشروعك وقاعدة البيانات
تحياتى لك
وتمنياتى لك التوفيق
RE: جلب بيانات معينة بدلالة المعرف (Id) - ibrahimmakhool - 30-05-18
هذا هو المشروع .... وما اقصده هو يوجد فورم خاص بادخال المرضى ويوجد فورم خاص بالمختبر وما اريده هو عند وضع رقم المريض في فورم المختبر اريد اظهار بيانات المريض عن طريق رقم المريض
RE: جلب بيانات معينة بدلالة المعرف (Id) - elgokr - 30-05-18
(30-05-18, 12:20 AM)ibrahimmakhool كتب : هذا هو المشروع .... وما اقصده هو يوجد فورم خاص بادخال المرضى ويوجد فورم خاص بالمختبر وما اريده هو عند وضع رقم المريض في فورم المختبر اريد اظهار بيانات المريض عن طريق رقم المريض
ينقص بعض التفاصيل وهو
ما اسم الفورم الخاص بادخال المرضي؟
وما هو اسم الفورم الخاص بالمختبر؟
وما هو اسم جدول المرضي بقاعدة البيانات
على العموم بما انى اطلعت على طريقة كتابتك للاكواد
فيمكنك عمل التالى
لنقول ان الفورم الخاص بالمختبر باسم Form2
ويحتوى على textbox و button
textbox هنا خاص لادخال رقم المريض
button لاتمام عرض بيانات المريض فى باقى توزيعة الفورم
ستاتي الى Button وتضع باخله الكود التالى
كود :
patientDT.Clear()
PatientDA = New OleDbDataAdapter("select * from Patient where Patientname = '" & TextBox1.Text & "'", con)
PatientDA.Fill(patientDT)مع اخد بالاعتبار تغيير اسم الجدول والحقول للجدول الخاص بالمرضي
من ثم القيام بادراج اسفل هذا الكود التالى
لنقول ان لديك
1- (اسم المريض - textbox2)
2- (موقف المريض - textbox3)
كود :
textbox2.text = patientDT.Rows(0).Item("اسم المريض")
textbox3.text = patientDT.Rows(0).Item("موقف المريض")بدلاً من مسميات العربي قم بادخال اسم الاعمدة من جدول المريض
وبكده يتم عمل ما تريده
اذا كنت بحاجة عند الكتابة يتم عرض البيانات دون الحاجة على ضغط على الزر
طبق الكود نفسه على
PHP كود :
TextBox1_KeyPress
مع عمل كود عند الضغط على enter يقوم بتنفيذ الكود
والكود هو
كود :
If Asc(e.KeyChar) = Keys.Enter Then
'''''' || ضع الكود هنا || ''''''
End Ifتحياتى لك
وتمنياتى لك التوفيق
RE: جلب بيانات معينة بدلالة المعرف (Id) - ibrahimmakhool - 30-05-18
مشكوريين ومشكور اخي [b]elgokr كان هناك مشكلة في جملة الإتصال وتم حلها [/b]
RE: جلب بيانات معينة بدلالة المعرف (Id) - elgokr - 30-05-18
الشكر لله
وتمنياتى لك التوفيق