+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم قواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=40)
+--- قسم : قسم أسئلة قواعد البيانات تحت بيئة الـ.NET (http://vb4arb.com/vb/forumdisplay.php?fid=41)
+--- الموضوع : مشكلة لسه ماحدش جاوبني عليها cmd.excutenunquery (/showthread.php?tid=37461)
مشكلة لسه ماحدش جاوبني عليها cmd.excutenunquery - Medo84 - 12-01-21
Try
cmd = New SqlCommand("insert into table0 values ('" & TextBox1.Text & "'," & TextBox2.Text & "','" & TextBox3.Text & "','" & TextBox4.Text & "','" & TextBox5.Text & "','" & TextBox6.Text & "','" & TextBox7.Text & "','" & TextBox8.Text & "','" & TextBox9.Text & " ' ) ", con)
Me.FillDataGridView("Select * From Table0")
con.Open()
cmd.ExecuteNonQuery()
MsgBox("all data saved", MsgBoxStyle.Information)
dt.Clear()
Me.FillDataGridView("Select * From Table0")
MessageBox.Show("تم حفظ البيانات بنجاح", "تم الحفظ", MessageBoxButtons.OK, MessageBoxIcon.Information)
Catch ex As Exception
MsgBox(ex.Message)
End Try
RE: مشكلة لسه ماحدش جاوبني عليها cmd.excutenunquery - رضوان الجماعي - 27-08-23
ايش المطلوب
شوف الكود ناقص اخي كيف تمرر للبرميتر بهذا الطريقه قبل values حدد وين تريد التخزين في colum
RE: مشكلة لسه ماحدش جاوبني عليها cmd.excutenunquery - غزة العزة - 19-05-24
إليك الكود المصحح والمطور باستخدام المعلمات:
PHP كود :
Try
Using con As New SqlConnection("YourConnectionStringHere")
con.Open()
Using cmd As New SqlCommand("INSERT INTO table0 (Column1, Column2, Column3, Column4, Column5, Column6, Column7, Column8, Column9) VALUES (@val1, @val2, @val3, @val4, @val5, @val6, @val7, @val8, @val9)", con)
cmd.Parameters.AddWithValue("@val1", TextBox1.Text)
cmd.Parameters.AddWithValue("@val2", TextBox2.Text)
cmd.Parameters.AddWithValue("@val3", TextBox3.Text)
cmd.Parameters.AddWithValue("@val4", TextBox4.Text)
cmd.Parameters.AddWithValue("@val5", TextBox5.Text)
cmd.Parameters.AddWithValue("@val6", TextBox6.Text)
cmd.Parameters.AddWithValue("@val7", TextBox7.Text)
cmd.Parameters.AddWithValue("@val8", TextBox8.Text)
cmd.Parameters.AddWithValue("@val9", TextBox9.Text)
cmd.ExecuteNonQuery()
MsgBox("All data saved", MsgBoxStyle.Information)
MessageBox.Show("تم حفظ البيانات بنجاح", "تم الحفظ", MessageBoxButtons.OK, MessageBoxIcon.Information)
dt.Clear()
Me.FillDataGridView("Select * From Table0")
End Using
End Using
Catch ex As Exception
MsgBox(ex.Message)
End Try