Question

vb.net2010 Access数据库添加内容有误，请求帮忙解决

提示insert into语句语法错误 各在大神，帮忙解决一下，我的目的是在数据库dr表中添加一条内容，不更改之前的内容
Dim ObjConn As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=H:\VB.NET2010练习试例\我的程序练习\登入窗口\登入窗口\yxglxt.mdb")
'定义和建立数据连接
Dim ObjCom As New OleDb.OleDbCommand("select * from dr", ObjConn) '定义和数据命令
ObjConn.Open() '打开数据连接
ObjCom = New OleDb.OleDbCommand("select * from dr", ObjConn) '新的数据命令来自所连接的数据库的为登入界面的表
Dim strinsert As String = "insert into dr values('" & TextBox1.Text & "', '" & TextBox2.Text & "')"
Dim inst As OleDbCommand = New OleDbCommand(strinsert, ObjConn)
MessageBox.Show(inst.ExecuteNonQuery())
ObjConn.Close()

Answer 1

需要把错误截图发出来，而且你的代码逻辑混乱
比如：建议改成下面（因为查询命令没有用到，删除),用new声明的不需要再次new
Dim ObjConn As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=H:\VB.NET2010练习试例\我的程序练习\登入窗口\登入窗口\yxglxt.mdb")
'定义和建立数据连接
Dim strinsert As String = "insert into dr values('" & TextBox1.Text & "', '" & TextBox2.Text & "')"
Dim inst As OleDbCommand = New OleDbCommand(strinsert, ObjConn)
ObjConn.Open() '打开数据连接
MessageBox.Show(inst.ExecuteNonQuery())'执行命令
ObjConn.Close()