我目前正在制作一个简单的项目,显示一个人的列表,并基本上表明他们是在办公室,还是在外面.人们还可以编辑列表以指示他们是在办公室还是在办公室,并更新一条消息,说明他们什么时候回来.
我的问题是,当我更新列表时,我收到一条错误,指出我的Update语句中存在语法错误,但我找不到它.我正在使用visual studio 2012,在VB.NET中开发,并使用通过OleDB连接访问的访问数据库.
这是有问题的VB代码
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
If InOutComboBox.SelectedItem = "IN" Then
MessageTextBox.Text = ""
End If
con = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=..\..\People.mdb")
con.Open()
If ListView1.SelectedIndices.Count > 0 Then
Dim comStr As String = "UPDATE tblStaffNames SET OutIn = '" & InOutComboBox.SelectedItem & "', Note = '" & MessageTextBox.Text & "' WHERE recid = " & ListView1.SelectedItems(0).SubItems(0).Text
cmd = New OleDbCommand(comStr, con)
Try
cmd.ExecuteNonQuery()
Catch ex As Exception
MessageBox.Show(ex.Message & " - " …Run Code Online (Sandbox Code Playgroud)