ربط Textbox بقاعدة البيانات Sql لوسمحتوا

من الواضح أخي أنك أضافة البيانات عن طريق المعالج wizard لانه مافتح مع البرنامج ولكن لا أنصحك بهذه الطريقة تعلم كيف تربط قاعدة البيانات ببرنامج بالكود لسهولة ذلك من حيث الوصول وقلة الكود المكتوب وإذا كان كذلك عن طريق الويزرد اذهب إلى قائمة واختر ـــــــــــ> data ـــــــــــــ>show data source وبعدين نفس الجدول الي اخترته تضغط عليه مثل الكومبو بوكس ويظهر لك عرض datagridview أو details أختر الثانية واسحبها على الفورم ارجوا ان يكون هذا المطلوب وإلا وضح

الساهر

السلام عليكم

الف شكر

انا عارف وان اخوك طريقة الوزيرد

لكن كماهو موضح بالمرفق ابغى الاكواد الخاصه بالربط لان ماعندي خلفيه في كتابة الاكواد توي اعليمي

هذا الكود تضعه في module أو في أعلى صفحة الكود التابع للفورم والافضل انك تختار ملف مودل وتضع الكود

Module Module3
	Public con As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "\db_emp1.mdb")
	Public str As String
	Public dast As New DataSet
	Public dabtr As New OleDb.OleDbDataAdapter
	Public cunt As Integer
	Public max As Integer

بعدين تروح للزر بوتن اللي تبيه يعرض البيانات وتحدد مسبقاً كم تكست بوكس تحتاج وتضعها على فورم ومن تضع الكود التالي:

 Dim str1 As String
		Dim dabtr1 As OleDb.OleDbDataAdapter
		str1 = ("select * from unit_info order by [numb_emb1]")
		dabtr1 = New OleDb.OleDbDataAdapter(str1, con)
		dabtr1.Fill(dast, "unit_info")
		TextBox6.Text = dast.Tables("unit_info").Rows(0).Item(0)
		TextBox7.Text = dast.Tables("unit_info").Rows(0).Item(1)
		TextBox8.Text = dast.Tables("unit_info").Rows(0).Item(2)
		TextBox9.Text = dast.Tables("unit_info").Rows(0).Item(3)
		TextBox10.Text = dast.Tables("unit_info").Rows(0).Item(4)
		TextBox11.Text = dast.Tables("unit_info").Rows(0).Item(5)

قبله تفتح الاتصال ممكن يعطيك رسالة يقول الاتصال مغلق con.open

ويجب غلق الاتصال بعد عملية العرض

الساهر

تحياتي لابداعك

بس ظهر عندي خطا

(Could not find file 'C:\Users\mosaed\Documents\Visual Studio 2008\Projects\my applacation\my applacation\bin\Debug\masterDataSet.xsd.mdb'.)

وهذا الموشر عليه بالاصفر في الكود

dabtr1.Fill(dast, "unit_info")

انا اسم قاعدة البيانات عندي

masterDataset.xsd

اشكر ايضاحاتك وصبرك

	Public con As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "\masterDataSet.xsd.mdb")

إذا كانت قاعدة البيانات في نفس ملف البين BIN\Debug

ضع نفس اللي فوق Application.StartupPath معناها قاعدة البيانات نفس مسار التطبيق أو تضعه على السي قاعدة البيانات يكون الكود التالي

Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\

unit_info هذا اسم جدول في قاعدة البيانات عندي انت ضع اسم الجدول بين علامتي تنصيص.