المشاركات : 76
المواضيع 21
الإنتساب : Dec 2013
السمعة :
0
الشكر: 1
تم شكره 12 مرات في 7 مشاركات
استاذ سعود عملت زى ما انت قلت بس برضه فى خطوط زرقة انا طبعا عرفت انه فى فرق بين
(dim con as new oledb.oledbconnection(str
dim con as new oledbconnection(str)
الفرق النقطة ودى اشتغلت معاية Dim Conn As New OleDbConnection(ConStr)
وبص على الكود اللى كتبته وقلى ايه اللى فيه غلط
Imports System.Data
Imports System.Data.OleDb
Public Class Form1
Dim ConStr As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source =" & Application.StartupPath & "\بيانات_قطع_الأراضى_اخير.mdb.mdb"
Dim Conn As New OleDbConnection(ConStr)
Dim DataSet1 As New DataSet
Dim SQLstr As String = "SELECT * FROM بياتات_العملاء"
Private Sub GroupBox4_Enter(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GroupBox4.Enter
Conn.Open()
Dim DataAdapter1 As New OleDbDataAdapter(SQLstr, Conn)
DataAdapter1.Fill(DataSet1, "Table1")
Conn.Close()
TextBox1.DataBindings.Add("Text", DataSet1, "بياتات_العملاء.ID_Amlaa")
TextBox2.DataBindings.Add("Text", DataSet1, "بياتات_العملاء.neme")
TextBox3.DataBindings.Add("Text", DataSet1, "بياتات_العملاء.National ID")
TextBox4.DataBindings.Add("Text", DataSet1, "بياتات_العملاء.Name of the wife / husband")
TextBox5.DataBindings.Add("Text", DataSet1, "بياتات_العملاء.Number of Children")
TextBox6.DataBindings.Add("Text", DataSet1, "بياتات_العملاء.Phone number")
TextBox7.DataBindings.Add("Text", DataSet1, "بياتات_العملاء.Address")
End Sub
End Class
هو عطينى الخط الأزرق تحت كل تكست زي ما انا موضح
المشاركات : 7,394
المواضيع 803
الإنتساب : Sep 2013
السمعة :
847
الشكر: 13249
تم شكره 18797 مرات في 4415 مشاركات
اخ علي الله يرضى عليك اكتب الكود بعد ان تغير المحاذاة الى اليسار ثم تضمن الكود ضمن احدى الوسوم لكي يظهر الكود ضمن تنسيق الكود وتظهر بالجهة اليسرى لانها انجليزي.
لان كذا الامر مزعج واسف اخوي
المشاركات : 76
المواضيع 21
الإنتساب : Dec 2013
السمعة :
0
الشكر: 1
تم شكره 12 مرات في 7 مشاركات
استاذ سعود انا كاتبه الكود الى اليسار بس هو لما نسخته ولصقته على الموقع فى الرد على الموضع بيجى كده بالعكس
المشاركات : 7,394
المواضيع 803
الإنتساب : Sep 2013
السمعة :
847
الشكر: 13249
تم شكره 18797 مرات في 4415 مشاركات
اخي الكريم قد ابدو متعصبا ضد اللغة العربية لكن ليس الامر كذلك .. لا احب كتابة اسماء الاعمدة باللغة العربية استخدم حروف لاتينية ولو بنطق عربي بالذات لاسماء الاعمدة ايضا استبدل الفراغ بحرف التسطير السفلي _ افضل.
الطلب الاخير ان تقوم بانشاء مشروع جديد(بسيط) بمحاولاتك للربط وتقوم برفعه لكي تعرف الامور الغامضة.
وفقك الله لكل مافيه رضاه.
المشاركات : 76
المواضيع 21
الإنتساب : Dec 2013
السمعة :
0
الشكر: 1
تم شكره 12 مرات في 7 مشاركات
حاضر انا اسف لأزعاجك انا هعمل مشروع جديد وابعته لحضرتك
المشاركات : 167
المواضيع 10
الإنتساب : Feb 2014
السمعة :
6
الشكر: 416
تم شكره 419 مرات في 64 مشاركات
imports System.Data.OleDb
ســبحــانك الـلهم بـحمدك , الـلهم لا عــلم لـنا الى مــأ علــمتــنا , الـلهـم علــمنـا ما جــهلـنا وانــفـعنــا بــما عــلمــتنـا انــك انـتَ الـسـميع الــعلــيم الـحكـيم ~~!I!