الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

اسناد قيمة من الداتا ست إلى تكست بوكس

بدأه طالبة اوراكل في 16 يناير 2012 · 6 رد · 893 مشاهدة · في ADO.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ورحمة الله وبركاته

لدي فورم لبيانات الموظفين ..اسم الموظف كمبوبوكس ..عندما اختار اسم الموظف يعرض بياناته على الفورم

ماهي الجملة المناسبة

Dim cmd3 As New OracleCommand("select * from emp where name=:namee ", con)

cmd3.Parameters.AddWithValue(":namee", NAMEComboBox.Text)

Dim oraAdapter1 As New OracleDataAdapter

oraAdapter1.SelectCommand = cmd3

Dim ds1 As New DataSet

ds1.Clear()

oraAdapter1.Fill(ds1, "emp")

MANGComboBox.DataSource = ds1

MANGComboBox.DisplayMember = "emp.mang"

DEPTComboBox.DataSource = ds1

DEPTComboBox.DisplayMember = "emp.dept"

أريد تعبئة حقول بيانته الشخصية التي من نوع textbox

وشكرا مسبقاً ..

#2

اخي الكريم جرب التالي

txtEmpName.Text=ds1.Tables("Emp").Rows(0)("EmpName)

تم تعديل هذه المشاركة بواسطة Jamalbootruba في 16 يناير 2012 في 13:56

تزودوا فأن خيرا الزاد التقوى

اللهم انصر اخواننا المسلمين المجاهدين في كل مكان

#3

السلام عليكم ورحمه الله وبركاته

اختي جربي الكود التالي

txtName.DataBinding.Add("Text",ds.Tables("emp"),"Name")

تم تعديل هذه المشاركة بواسطة VB Helper في 16 يناير 2012 في 17:25

.:: Wish to become better and better ::.

#4
Jamalbootruba كتب:

اخي الكريم جرب التالي

txtEmpName.Text=ds1.Tables("Emp").Rows(0)("EmpName)

شكرا أخي ..ولكنني لم اسأل الا بعد أن جربت مثل هذا الكود وكانت رسالة الخطأ تقول بأن الموقع (0)item غير موجود وقمت بتغيير قيمة الاندكس ولم تتغير رسالة الخطأ.

VB Helper كتب:

السلام عليكم ورحمه الله وبركاته

اختي جربي الكود التالي

txtName.DataBinding.Add("Test",ds.Tables("emp"),"Name")

عفوا أخي ..

ماهي "test"..وماذا تقصد بال"txtname"

#5

test خطا مطبعي يقصد Textالخاصة بال TextBox

1

تزودوا فأن خيرا الزاد التقوى

اللهم انصر اخواننا المسلمين المجاهدين في كل مكان

#6

السلام عليكم ورحمه الله وبركاته

شكرا اخي جمال, بالفعل كنت اقصد Text وقد تم تعديله, بالمناسبة حول رسالة الخطأ السابقة تأكدي ان الاستعلام يرجع صف على الاقل

.:: Wish to become better and better ::.

#7
VB Helper كتب:

السلام عليكم ورحمه الله وبركاته

شكرا اخي جمال, بالفعل كنت اقصد Text وقد تم تعديله, بالمناسبة حول رسالة الخطأ السابقة تأكدي ان الاستعلام يرجع صف على الاقل

شكرا لكما ..حلت المشكلة ولله الحمد

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…