VB2010添加ACCESS数据库记录

大家好，我使用VB2010连接ACCESS数据库以后，在增加表中的记录时发现不能更新到数据库里。数据库肯定连上了，测试过，SQL语句也没有错，就是执行了以后数据库中什么都没变。代码如下：

VB.NET code

        Dim mdbConn As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\Deno.accdb;Persist Security Info=True")
        
        mdbConn.Open()

        Dim mdbCmdAddStr As String = "Insert into JE ([JE_NUM],[ACC_CODE]) values (12345,54321)"
        Dim mdbCmdAddStr2 As String = "Delete * from JE where [JE_NUM]=1111"
        Dim mdbCmdAdd As New OleDb.OleDbCommand(mdbCmdAddStr2, mdbConn)

        MessageBox.Show(mdbCmdAdd.ExecuteNonQuery())

        mdbConn.Close()

执行后返回说2条记录被删除。说明连接和command都是对的，就是不反应到数据库里。不知道为什么。

发现将|DataDirectory|改成绝对路径就可以，很奇怪。

应该声明一下CommandType吧