【发布时间】:2014-07-09 01:03:31
【问题描述】:
尝试将值插入访问数据库时出现错误。错误说:
System.Data.dll 中出现“System.Data.OleDb.OleDbException”类型的未处理异常。附加信息:INSERT INTO 语句中的语法错误。
所有值类型都是我的 Access db 中的文本。
这是我的代码:
谢谢。
Public Class NewUser
Dim cnn2 As New OleDb.OleDbConnection
Private Sub NewUser_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
cnn2 = New OleDb.OleDbConnection
cnn2.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\Chris\Desktop\UserInfo.accdb"
frmMain.Visible = True
Me.Visible = False
End Sub
Private Sub RefreshData()
If Not cnn2.State = ConnectionState.Open Then
cnn2.Open()
End If
End Sub
Private Sub btnCreate_Click(sender As System.Object, e As System.EventArgs) Handles btnCreate.Click
If (txtPassword.Text = txtConfirm.Text) Then
greenP.Visible = True
Dim cmd2 As New OleDb.OleDbCommand
If Not cnn2.State = ConnectionState.Open Then
cnn2.Open()
End If
cmd2.Connection = cnn2
cmd2.CommandText = "INSERT INTO Users (FirstName, LastName, Address, City, State, Zip, Email, Username, Password) VALUES ('" & txtFirst.Text & "', '" & txtLast.Text & "', '" & txtAddress.Text & "', '" & txtCity.Text & "', '" & txtState.Text & "', '" & txtZip.Text & "', '" & txtEmail.Text & "', '" & txtUsername.Text & "', '" & txtPassword.Text & "')"
cmd2.ExecuteNonQuery()
cnn2.Close()
txtAddress.Clear()
txtCity.Clear()
txtConfirm.Clear()
txtEmail.Clear()
txtFirst.Clear()
txtLast.Clear()
txtPassword.Clear()
txtState.Clear()
txtUsername.Clear()
txtZip.Clear()
txtFirst.Focus()
Else
redP.Visible = True
MessageBox.Show("Passwords do not match. Please enter again", "Notice", MessageBoxButtons.OK, MessageBoxIcon.Information)
txtConfirm.Clear()
txtConfirm.Focus()
End If
End Sub
结束类
【问题讨论】:
标签: vb.net ms-access sql-insert