读书人

vb.net连接Access数据库在 cmd.Exe

发布时间: 2013-07-09 09:50:47 作者: rapoo

vb.net连接Access数据库,在 cmd.ExecuteNonQuery()行提示Insert into语句语法错误,请高手指点
Dim cn As New OleDbConnection
cn.ConnectionString = ConfigurationManager.ConnectionStrings("access2003").ConnectionString
cn.Open()
Dim cmd As New OleDbCommand
Dim tsql As String

Dim sex As String
If RadioButton1.Checked Then
sex = "男"
Else
sex = "女"
End If
tsql = "insert into 家教需求信息(家长姓名,家庭地址,家庭电话,手机号,子女姓名,子女性别,就读学校,就读年级,辅导课目,辅导时间,对家教要求)values('" & TextBox1.Text & "','" & TextBox2.Text & "','" & TextBox3.Text & "','" & TextBox4.Text & "','" & TextBox5.Text & "','" & sex & "','" & TextBox6.Text & "','" & TextBox7.Text & "','" & TextBox8.Text & "','" & TextBox9.Text & "','" & TextBox10.Text & "',)"
cmd = New OleDbCommand(tsql, cn)
cmd.ExecuteNonQuery()
Response.Write("<script language='javascript'>alert('成功添加用户!');</script>")
cn.Close()

[解决办法]
最后面多了个 【,】 吧

('" & TextBox1.Text & "','" & TextBox2.Text & "','" & TextBox3.Text & "','" & TextBox4.Text & "','" & TextBox5.Text & "','" & sex & "','" & TextBox6.Text & "','" & TextBox7.Text & "','" & TextBox8.Text & "','" & TextBox9.Text & "','" & TextBox10.Text & "'【,】)

读书人网 >VB Dotnet

热点推荐