السلام عليكم ورحمه الله وبركاته
اولا اسف اذا مكان الموضوع خطاء
انا احاول عمل مشروع تخرجى مستشفى وقمت بتصميم كافة الصفحات وقمت بعمل داتا بيز بالاكسس واعلم على الفجول بيسك ستديو
2013
ولكن واجهتنى مشكلة فى هذا الكود
A first chance exception of type 'System.Data.OleDb.OleDbException' occurred in System.Data.dll
Additional information: Syntax error in INSERT INTO statement.
-------
الكود
If (String.IsNullOrWhiteSpace(TextBox2.Text) AndAlso String.IsNullOrWhiteSpace(TextBox3.Text) AndAlso String.IsNullOrWhiteSpace(TextBox4.Text) AndAlso String.IsNullOrWhiteSpace(TextBox5.Text) AndAlso String.IsNullOrWhiteSpace(TextBox6.Text) AndAlso String.IsNullOrWhiteSpace(TextBox7.Text) AndAlso String.IsNullOrWhiteSpace(TextBox8.Text) AndAlso String.IsNullOrWhiteSpace(TextBox9.Text) AndAlso String.IsNullOrWhiteSpace(TextBox10.Text)) Then
MessageBox.Show("يجب ملئ الخانات قبل الحفظ")
Return
End If
Dim cmd As New OleDbCommand("insert into Operationsprices ( اسم الطبيب , اسم طبيب التخدير , نوع العمليه , رقم غرفة العمليه , سعر العمليه , سعر المتابعه , سعر التخدير , الخصم ,الاجمالي) values ('" + TextBox2.Text + "','" + TextBox3.Text + "','" + TextBox4.Text + "','" + TextBox5.Text + "','" + TextBox7.Text + "','" + TextBox8.Text + "','" + TextBox9.Text + "','" + TextBox10.Text + "')")
cmd.Connection = con
con.Open()
cmd.ExecuteNonQuery()
con.Close()
MessageBox.Show("تم اللحفظ بناجح")
TextBox2.Text = String.Empty
TextBox3.Text = String.Empty
TextBox4.Text = String.Empty
TextBox5.Text = String.Empty
TextBox6.Text = String.Empty
TextBox7.Text = String.Empty
TextBox8.Text = String.Empty
TextBox9.Text = String.Empty
TextBox10.Text = String.Empty
End Sub
وايضا
قمت بتغير ال + الى & ولكن دون جدوى
وانا حتى الان لا اعرف على اى لغة انا اعمل الان لاننى مبتدئ واحاول تتبع شروحات ولكن لايمكننى ان اجد حل وساقوم بعمل مناقشة قريب وارجو المساعده واسف جدا على الاطاله