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

نسخة كاملة : ظهور الارقام بدل من القيم
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
ربطت جدول اكسس 2013 ب فيجووال استديو 2010
وعند ملء الجريد فيو الجدول فى القول المرتبطة بدول اخر يظهر فيها الرقم بدل من القيمة

فما هو الكود الذى يجل القيمة او النص هو الذى يظهر بدل من الكود
(17-10-23, 03:50 PM)salah525 كتب : [ -> ]ربطت جدول اكسس 2013 ب فيجووال استديو 2010
وعند ملء الجريد فيو الجدول فى القول المرتبطة بدول اخر يظهر فيها الرقم بدل من القيمة

فما هو الكود الذى يجل القيمة او النص هو الذى يظهر بدل من الكود

لعرض القيمة بدلا من الرقم في الجداول المرتبطة عليك بعمل SQL INNER JOIN في الاستعلام
ارفق قاعدة البيانات من اسماء الحقول التي تريد ظهورها ولو امكن ارفاق المشروع للتعديل عليه
المشكلة ان المشروع لجمعية خيرية ولا استطيع رفعه من اجل سرية الاسماء


مثلا

فى الجدول tbl_Show_Familys وبه حقل اسمه Type_Osra هذا يظهر فية الرقم

والجدول الذى ياخذ منه اسمه tbl_Family وبه حقلين Code , State
بإمكانك نسخ قاعدة البيانات وتفريغ النسخة من البيانات وتعبئتها بـ  بيانات وهمية بغرض التجربة
ورفعها ليستطيع الأعضاء فهمك ومساعدتك ..
ارفق قاعدة البيانات من اسماء الحقول التي تريد ظهورها ولو امكن ارفاق المشروع للتعديل عليه

هذه هى القاعدة
(19-10-23, 03:00 AM)salah525 كتب : [ -> ]المشكلة ان المشروع لجمعية خيرية ولا استطيع رفعه من اجل سرية الاسماء


مثلا

فى الجدول  tbl_Show_Familys وبه حقل اسمه  Type_Osra  هذا يظهر فية الرقم

والجدول الذى ياخذ منه اسمه  tbl_Family      وبه حقلين  Code             ,        State

(19-10-23, 11:04 PM)salah525 كتب : [ -> ]ارفق قاعدة البيانات من اسماء الحقول التي تريد ظهورها ولو امكن ارفاق المشروع للتعديل عليه

هذه هى القاعدة

هذا مجرد مثال لعمل INNER JOIN للربط مع الجدول tbl_Family
PHP كود :
   Sub table1_load()
 
       Me.FamilysDGView.Columns("DataGridViewTextBoxColumn6").DataPropertyName "State"
 
       table1.Clear()
 
       openconn()
 
       ds = New DataSet
        da 
= New OleDb.OleDbDataAdapter("Select tbl_Show_Familys.*,tbl_Family.State FROM tbl_Show_Familys INNER JOIN tbl_Family ON tbl_Show_Familys.Type_Osra=tbl_Family.Code"Conn)
 
       da.Fill(Me.SalahDataSet.tbl_Show_Familys)
 
       txtID_R.Text GetAutoNum("tbl_show_familys""id_r")
 
   End Sub 
لاحظ انني عدلت بالكود الاسم في DataPropertyName للعمود السادس ليقرأ State بدلا من Type_Osra

المفروض أن لا تكتب *.tbl_Show_Familys وعليك فقط أن تكتب أسماء الحقول المطلوب إظهارها
(20-10-23, 02:15 AM)Ahmed5 كتب : [ -> ]
(19-10-23, 03:00 AM)salah525 كتب : [ -> ]المشكلة ان المشروع لجمعية خيرية ولا استطيع رفعه من اجل سرية الاسماء


مثلا

فى الجدول  tbl_Show_Familys وبه حقل اسمه  Type_Osra  هذا يظهر فية الرقم

والجدول الذى ياخذ منه اسمه  tbl_Family      وبه حقلين  Code             ,        State

(19-10-23, 11:04 PM)salah525 كتب : [ -> ]ارفق قاعدة البيانات من اسماء الحقول التي تريد ظهورها ولو امكن ارفاق المشروع للتعديل عليه

هذه هى القاعدة

هذا مجرد مثال لعمل INNER JOIN للربط مع الجدول tbl_Family
PHP كود :
   Sub table1_load()
 
       Me.FamilysDGView.Columns("DataGridViewTextBoxColumn6").DataPropertyName "State"
 
       table1.Clear()
 
       openconn()
 
       ds = New DataSet
        da 
= New OleDb.OleDbDataAdapter("Select tbl_Show_Familys.*,tbl_Family.State FROM tbl_Show_Familys INNER JOIN tbl_Family ON tbl_Show_Familys.Type_Osra=tbl_Family.Code"Conn)
 
       da.Fill(Me.SalahDataSet.tbl_Show_Familys)
 
       txtID_R.Text GetAutoNum("tbl_show_familys""id_r")
 
   End Sub 
لاحظ انني عدلت بالكود الاسم في DataPropertyName للعمود السادس ليقرأ State بدلا من Type_Osra

المفروض أن لا تكتب *.tbl_Show_Familys وعليك فقط أن تكتب أسماء الحقول المطلوب إظهارها

بارك الله فيك اخى الفاضل تمام الحقل ظهر فيه النص بدلا من الارقام
مشكور اخى الفاضل
عند اضافة حقل اخر ابدمن بعد هذه العباره tbl_Family.Code بنفس الطريقة
تمام

حاولت اضافة حقل اخر
ظهرت لى اخطاء
مثل خطا فى جملة from
خطأ فى جملة inner
tbl_customers.customers FROM tbl_Show_Familys INNER JOIN tbl_customers ON tbl_Show_Familys.customers = tbl_customers.customerId
(21-10-23, 02:05 AM)salah525 كتب : [ -> ]
(20-10-23, 02:15 AM)Ahmed5 كتب : [ -> ]
(19-10-23, 03:00 AM)salah525 كتب : [ -> ]المشكلة ان المشروع لجمعية خيرية ولا استطيع رفعه من اجل سرية الاسماء


مثلا

فى الجدول  tbl_Show_Familys وبه حقل اسمه  Type_Osra  هذا يظهر فية الرقم

والجدول الذى ياخذ منه اسمه  tbl_Family      وبه حقلين  Code             ,        State

(19-10-23, 11:04 PM)salah525 كتب : [ -> ]ارفق قاعدة البيانات من اسماء الحقول التي تريد ظهورها ولو امكن ارفاق المشروع للتعديل عليه

هذه هى القاعدة

هذا مجرد مثال لعمل INNER JOIN للربط مع الجدول tbl_Family
PHP كود :
   Sub table1_load()
 
       Me.FamilysDGView.Columns("DataGridViewTextBoxColumn6").DataPropertyName "State"
 
       table1.Clear()
 
       openconn()
 
       ds = New DataSet
        da 
= New OleDb.OleDbDataAdapter("Select tbl_Show_Familys.*,tbl_Family.State FROM tbl_Show_Familys INNER JOIN tbl_Family ON tbl_Show_Familys.Type_Osra=tbl_Family.Code"Conn)
 
       da.Fill(Me.SalahDataSet.tbl_Show_Familys)
 
       txtID_R.Text GetAutoNum("tbl_show_familys""id_r")
 
   End Sub 
لاحظ انني عدلت بالكود الاسم في DataPropertyName للعمود السادس ليقرأ State بدلا من Type_Osra

المفروض أن لا تكتب *.tbl_Show_Familys وعليك فقط أن تكتب أسماء الحقول المطلوب إظهارها

بارك الله فيك اخى الفاضل تمام الحقل ظهر فيه النص بدلا من الارقام
مشكور اخى الفاضل
عند اضافة حقل اخر ابدمن  بعد هذه العباره tbl_Family.Code بنفس الطريقة
تمام

حاولت اضافة حقل اخر
ظهرت لى اخطاء
مثل خطا فى جملة from
خطأ فى جملة inner
tbl_customers.customers FROM tbl_Show_Familys INNER JOIN tbl_customers ON tbl_Show_Familys.customers = tbl_customers.customerId

PHP كود :
Me.FamilysDGView.Columns("DataGridViewTextBoxColumn6").DataPropertyName "State"
Me.FamilysDGView.Columns("DataGridViewTextBoxColumn8").DataPropertyName "customerName"
da = New OleDb.OleDbDataAdapter("Select tbl_Show_Familys.*,tbl_Family.State,tbl_customers.customerName FROM ((tbl_Show_Familys INNER JOIN tbl_Family ON tbl_Show_Familys.Type_Osra=tbl_Family.Code) INNER JOIN tbl_customers ON tbl_Show_Familys.customers=tbl_customers.customerId)"Conn
PHP كود :
Me.FamilysDGView.Columns("DataGridViewTextBoxColumn6").DataPropertyName "State"
Me.FamilysDGView.Columns("DataGridViewTextBoxColumn8").DataPropertyName "customerName"
da = New OleDb.OleDbDataAdapter("Select tbl_Show_Familys.*,tbl_Family.State,tbl_customers.customerName FROM ((tbl_Show_Familys INNER JOIN tbl_Family ON tbl_Show_Familys.Type_Osra=tbl_Family.Code) INNER JOIN tbl_customers ON tbl_Show_Familys.customers=tbl_customers.customerId)"Conn
[/quote]

بارك الله فيك اخى الكريم
الله ينور على حضرتك

بس بعض المشكلة لم ينحل هو ظهور الرقم فى الادوات (اى التكست بوكس، والكمبوبس) وعند تغييرة لا يقبل الكتابة
اى النص ظهر فى الجريد ولكن الادوات لازال يظهر فيها الارقام

وعند الاضافة تظهر هذه الرسالة

التحويل من السلسلة "" إلى النوع 'Long' غير صالح.