在我使用vb.net-acess通過dataAdapter物件的insertcommand屬性向資料庫中添加紀錄時,
運行的時候老是出現字串語法錯誤的提示,不知道哪里出了問題。求解答!!急
十分感謝!!
主要代碼:
類:
Shared Function add() As String
Dim insval As String = "'" & stuname & "','" & stusex & "','" & stuhousenum & "','" & stuhousetype & "','" & stuzjtype & "','" & stuzjnum & "','" & stunum & "','" & studata & _
"','" & stuphonenum
Dim oledbins As String = "insert into customer(cusname,cussex, cushousenum, cushousetype, cuszjtype, cuszjnum, cusnum,cusdata,cusphonenum) values(" & insval & ")"
Dim msg As String
Try
conn.Open()
Dim inscom As New OleDbCommand(oledbins, conn)
Dim da As New OleDbDataAdapter
da.InsertCommand = inscom
da.InsertCommand.ExecuteNonQuery()
msg = "記錄添加成功"
Catch ex As Exception
msg = ex.Message
Finally
conn.Close()
End Try
Return msg
End Function
添加紀錄: If Rad1.Checked = True Then
student.stusex = "男"
Else
student.stusex = "女"
End If
student.stuname = txtname.Text
student.stuhousenum = txthousenum.Text
student.stuhousetype = Txthousetype.Text
student.stuzjtype = Txtzjtype.Text
student.stuzjnum = Textzjnum.Text
student.stunum = Textcusnum.Text
student.studata = Textdata.Text
student.stuphonenum = Textphonenum.Text
Dim msg As String = student.add()
MessageBox.Show(msg, "系統提示", MessageBoxButtons.OK, MessageBoxIcon.Information)
uj5u.com熱心網友回復:
這樣寫試試:sql=" insert into 表名(字符型欄位,數值型欄位) values('"& 字符型變數 &"',"& 數值型變數 &")"
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/106569.html
上一篇:【求助】CallWindowProc成功呼叫類模塊函式,但是函式結束時崩潰退出。。。
下一篇:關于快取瀏覽FTP上的圖片
