[bm200920]

Dim savInto As New OleDb.OleDbCommand
            Dim CnStr As String = "provider = Microsoft.ACE.OLEDB.12.0;" &
                "data Source= " & Application.StartupPath & "\Database3.accdb"

            Dim Conn As New OleDbConnection(CnStr)
            savInto.Connection = Conn
            savInto.CommandType = CommandType.Text
            savInto.CommandText = "Insert into Proced1(Number,Name,Program,PD,Goal,Effect,Class,Sharing,Date)" &
                "Values(" & TextBox1.Text & ",'" & TextBox2.Text & "','" & TextBox3.Text & "', '" & TextBox4.Text & "' , &
'" & TextBox5.Text & "', '" & TextBox6.Text & "', '" & TextBox7.Text & "','" & TextBox8.Text & "','" & TextBox9.Text & "')"

            Conn.Open()
            savInto.ExecuteNonQuery()
            Conn.Close()
            MsgBox(" تم الحفظ بنجاج")



يظهر لي حطأ في تكوين الجملة
ممكن احد يعرف وين المشكلة

---

خطأ * تصحيح

[]

(11-04-23, 01:13 AM)bm200920 كتب : Dim savInto As New OleDb.OleDbCommand
            Dim CnStr As String = "provider = Microsoft.ACE.OLEDB.12.0;" &
                "data Source= " & Application.StartupPath & "\Database3.accdb"

            Dim Conn As New OleDbConnection(CnStr)
            savInto.Connection = Conn
            savInto.CommandType = CommandType.Text
            savInto.CommandText = "Insert into Proced1(Number,Name,Program,PD,Goal,Effect,Class,Sharing,Date)" &
                "Values(" & TextBox1.Text & ",'" & TextBox2.Text & "','" & TextBox3.Text & "', '" & TextBox4.Text & "' , &
'" & TextBox5.Text & "', '" & TextBox6.Text & "', '" & TextBox7.Text & "','" & TextBox8.Text & "','" & TextBox9.Text & "')"

            Conn.Open()
            savInto.ExecuteNonQuery()
            Conn.Close()
            MsgBox(" تم الحفظ بنجاج")



يظهر لي حطأ في تكوين الجملة
ممكن احد يعرف وين المشكلة

---

خطأ * تصحيح

يوجد اسماء اعمدة محجوزة ويجب ان تغير اسماءها
Number
Date

[bm200920]

انا مسوية اكثر من برنامج وضبط 
ومع ذلك اخذت بنصيحتك ولا ضبط الغاء الربط من القاعدة اول كانت مشكلة الاضافة من البرنامج الان مشكلة في الربط بعد

[Taha Okla]

لو أرفقتي نسخة من المشروع أو مشروع بسيط  فيه قاعدة بيانات وفيه نفس المشكلة 
يكن أفضل للتجريب - وأعطائك حل مجرب .

[عبدالله الدوسري]

فعلاً الكلمة : Date + Name
من الأسماء المحجوزة لنظام قواعد أكسس ,وقواعد بيانات أخرى، يمكنك إستخدامها، لكن تحتاج إلى وضع أقواس مربعة حول اسم الحقل الذي يستخدم الاسم المحجوز ، مثلاً : [Name] 
   
لا ينصح بإستخدام الأسماء المحجوزة

أيضاً توجد العلامة (&)
موجودة بين TextBox4 وبين TextBox5 في بناء جملة الإستعلام

يجب إزالتها
   

[foo]

Number من الاسماء المحجوزه فتحتاج لوضع أقواس مربعه حوله [Number]

[bm200920]

(17-04-23, 09:43 PM)عبدالله الدوسري كتب : فعلاً الكلمة : Date + Name
من الأسماء المحجوزة لنظام قواعد أكسس ,وقواعد بيانات أخرى، يمكنك إستخدامها، لكن تحتاج إلى وضع أقواس مربعة حول اسم الحقل الذي يستخدم الاسم المحجوز ، مثلاً : [Name] 

لا ينصح بإستخدام الأسماء المحجوزة

أيضاً توجد العلامة (&)
موجودة بين TextBox4 وبين TextBox5 في بناء جملة الإستعلام

يجب إزالتها

شكرا ضبط معي

---

مشكورين على المساعدة

[bm200920]

السلام عليكم
من يعرف الاكواد الطباعه من الفجوال المرتبط بقاعدة بيانات