0

首先我为我糟糕的英语道歉。我正在尝试在表中插入新记录（tblCommentarios）

这是我正在使用的代码

conn.Provider = "Microsoft.Jet.OLEDB.4.0"

conn.Open "C:\Users\VilaNova\Documents\aspirador\guestbook.mdb"

sql = "INSERT INTO tblComentarios (nome,comentario) "

sql = sql & "VALUES ('john', 'good job');"

on error resume next

conn.Execute sql, recaffected

if error <> 0 then

   response.write "No permissions!"

else

   response.write "added record!"

end if

当我执行代码时，我没有收到任何错误，并且收到消息“添加记录”但是，当我打开数据库并查看表的内容时，没有值“约翰”和“干得好”的记录

谢谢你的帮助。

4

1 回答 1

2

尝试替换error为Err.Number：

If Err.Number <> 0 Then

我的猜测是你没有Option Explicit打开，所以error被隐式创建为一个新变量，其值设置为Empty. Empty为了比较，将其转换为0，因此似乎没有错误。

（顺便说一句，如果我的猜测是正确的，你真的应该Option Explicit在你编写的每个脚本的第一行中包含，并养成使用 . 明确声明变量的习惯Dim。）

于 2012-06-02T20:23:58.040 回答