为什么执行SELECT的时候正常,执行INSERT,DELETE,UPDATE的时候出现错误!!!
出现这样的报错:
操作必须使用一个可更新的查询。
异常详细信息: System.Data.OleDb.OleDbException: 操作必须使用一个可更新的查询。
Sub addRecord(sender As Object, e As Eventargs)
If Page.IsValid = True Then
'创建数据连接
Dim objConn As New OleDbConnection()
objConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & Server.MapPath("/Ch21/data.mdb")
objConn.Open()
'执行添加会员数据的 SQL 命令
Dim objCmd As New OleDbCommand()
objCmd.Connection = objConn
objCmd.Parameters.Add("@用户", OleDbType.Char).Value = userId.Text
objCmd.Parameters.Add("@密码", OleDbType.Char).Value = userPwd.Text
objCmd.Parameters.Add("@姓名", OleDbType.Char).Value = userName.Text
objCmd.Parameters.Add("@电话分机", OleDbType.Char).Value = telePhone.Text
objCmd.Parameters.Add("@移动电话", OleDbType.Char).Value = mobilePhone.Text
objCmd.Parameters.Add("@电子邮件", OleDbType.Char).Value = email.Text
objCmd.Parameters.Add("@备注", OleDbType.Char).Value = comment.Text
objCmd.CommandText= "Insert Into 用户列表(用户, 密码, 姓名, 职位, 电话分机,电子邮件,移动电话,备注) Values(?, ?, ?, ?, ?, ?, ?, ?)"
objCmd.ExecuteNonQuery()
objConn.Close()
Response.Redirect("OK.aspx?userId=" & userId.Text & "&userPwd=" & userPwd.Text)
End If
End Sub
报错在这句——————objCmd.ExecuteNonQuery()