السلام عليكم ورحمة الله وبركاته
أتمنى مساعدتي في أقرب وقت ممكن إذا أمكن وأنا مأملة فيكم خير
لدي أستفسار في جملة الأنسرت حيث أنه:-
لدي داله فيها جملة الأنسرت أرسل إليها 6 أو 15 قيمه مع أسماء الأعمده طبعاً يطلع خطأ وقت أستدعاء هذه الداله ويقول أن السنتكس خطأ ولم أعرف ماهو الخطأ
برغم من أستخدامي نفس هذه الداله ولكن لخمس قيم ويقبل ويضيف إلى الجدول عادي دون مشاكل
وإليكم هذه الداله
علماً أنها مرتبطه بلغة .net
[
Sub insert_cod15(ByVal tab As String, ByVal col1 As String, ByVal col2 As String, ByVal col3 As String, ByVal col4 As String, ByVal col5 As String, ByVal col6 As String, ByVal col7 As String, ByVal col8 As String, ByVal col9 As String, ByVal col10 As String, ByVal col11 As String, ByVal col12 As String, ByVal col13 As String, ByVal col14 As String, ByVal col15 As String, ByVal text1 As TextBox, ByVal text2 As TextBox, ByVal text3 As TextBox, ByVal text4 As TextBox, ByVal text5 As TextBox, ByVal text6 As TextBox, ByVal text7 As TextBox, ByVal text8 As TextBox, ByVal text9 As TextBox, ByVal text10 As TextBox, ByVal text11 As TextBox, ByVal text12 As TextBox, ByVal text13 As TextBox, ByVal text14 As TextBox, ByVal text15 As TextBox)
Try
Open_connection()
cmd.Connection = conn
cmd.CommandText = "INSERT INTO " + tab + " (" + col1 + "," + col2 + "," + col3 + "," + col4 + "," + col5 + "," + col6 + "," + col7 + "," + col8 + "," + col9 + "," + col10 + "," + col11 + "," + col12 + "," + col13 + "," + col14 + "," + col15 + ")" & _
"values ('" & text1.Text & "','" & text2.Text & "','" & text3.Text & "','" & text4.Text & "','" & text5.Text & "','" & text6.Text & "','" & text7.Text & "','" & text8.Text & "','" & text9.Text & "','" & text10.Text & "','" & text11.Text & "','" & text12.Text & "','" & text13.Text & "','" & text14.Text & "','" & text15.Text & "') "
cmd.ExecuteNonQuery()
conn.Close()
Catch ex As Exception
Exit Sub
End Try
End Sub
