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

ممكن تفسير هذا الخطا

بدأه night bat في 31 أغسطس 2008 · 1 رد · 579 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

258761843.jpg

مكن احد يقول لي شنو الخطا اللي طلع في الرساله

هذا كود button

Dim _Ginder As String

		If RadioButton1.Checked = True Then
			_Ginder = "Male"
		Else
			_Ginder = "Female"
		End If

		Try
			Dim ConStr As String = _
				"Provider=Microsoft.Jet.OLEDB.4.0; Data Source =" & _
				Application.StartupPath & "\db1.mdb"
			Dim Conn As New OleDbConnection(ConStr)
			Dim SavInto As New OleDb.OleDbCommand
			Conn.Open()
			SavInto.Connection = Conn
			SavInto.CommandText = "Insert into Table1(First Name,Last Name,CPR,Reason,Gendor,Join Date) values (@First Name,@Last Name,@CPR,@Reason,@Gendor,@Join Date)"
			SavInto.Parameters.AddWithValue("@First Name", TextBox1.Text)
			SavInto.Parameters.AddWithValue("@Last Name", TextBox2.Text)
			SavInto.Parameters.AddWithValue("@CPR", TextBox3.Text)
			SavInto.Parameters.AddWithValue("@Reason", ComboBox1.SelectedItem.ToString())
			SavInto.Parameters.AddWithValue("@Gendor", _Ginder.ToString())
			SavInto.Parameters.AddWithValue("@Join Date", DateTimePicker1.Text.ToString())
			SavInto.ExecuteNonQuery()
			Conn.Close()
			MsgBox("Add Succeeded")
			Me.Close()
			frm1.Show()
		Catch ex As Exception
			MsgBox(ex.ToString())
		End Try
#2

الرسالة واضحة جملة Insert Into خطأ

البلوك التالي خطأ بأكمله

 SavInto.CommandText = "Insert into Table1(First Name,Last Name,CPR,Reason,Gendor,Join Date) values (@First Name,@Last Name,@CPR,@Reason,@Gendor,@Join Date)"
			SavInto.Parameters.AddWithValue("@First Name", TextBox1.Text)
			SavInto.Parameters.AddWithValue("@Last Name", TextBox2.Text)
			SavInto.Parameters.AddWithValue("@CPR", TextBox3.Text)
			SavInto.Parameters.AddWithValue("@Reason", ComboBox1.SelectedItem.ToString())
			SavInto.Parameters.AddWithValue("@Gendor", _Ginder.ToString())
			SavInto.Parameters.AddWithValue("@Join Date", DateTimePicker1.Text.ToString())

لايمكنك إنشاء متغيرات قواعد بيانات هنا إما اكتب عبارة Insert Into كاملة أو استخدم Stored Procedures إذا أردت استخدام البارامترات

عن عائشة رضي الله عنها أن النبي صلى الله عليه وسلم قال: إن الله يحب إذا عمل أحدكم عملا أن يتقنه

نعيب زماننا والعيب فينا ... وما لزماننا عيب سوانا

ونهجو ذا الزمان بغير ذنب ... ولو نطق الزمان لنا هجانا

محمد سامر أبو سلو

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

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

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

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

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