我不是一個很好的程序員,但我認爲代碼是正確的。任何人都可以檢查它是否有錯誤,因爲我總是在執行查詢行發現錯誤。ExecuteNonQuery出錯
錯誤是:
{ 「附近有語法錯誤 '9'」。 & vbCrLf &}
和/或
類型的未處理的異常 「閉合的引號 字符串 '@ memberpic)'。之後,」 'System.Data.SqlClient.SqlException' 發生在系統.Data.dll
附加信息:「9」附近的語法錯誤。
Private Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click
cn.Open()
Using cmd As New SqlClient.SqlCommand("INSERT INTO tblMembers(name, contactno, address, birthday, baptism, ministry, memberpic)VALUES('" & txtName.Text & "','" & txtContactNo.Text & "','" & txtAddress.Text & "',''" & dtpBirthday.Text & "','" & dtpBaptism.Text & "','" & txtMinistry.Text & "',@memberpic)", cn)
cmd.Parameters.Add(New SqlClient.SqlParameter("@memberpic", SqlDbType.Image)).Value = IO.File.ReadAllBytes(a.FileName)
i = cmd.ExecuteNonQuery
End Using
If (i > 0) Then
MsgBox("Save " & i & " record successfully")
Clear()
End If
cn.Close()
ShowRecord()
End Sub