有一个Excel工作簿用作保存在共享文件夹中的数据库。用户有其他工作簿,其中有用户表单,允许插入和更新到数据库中。Excel工作簿作为数据库,插入更新问题
我正在使用connection.Execute
方法进行插入和更新,并使用recordsaffected
进行确认。
虽然recordsaffected
给出了正确,但有时插入或更新从未发生过。
我能做些什么来解决这个问题?
Set oCn = CreateObject("ADODB.Connection")
oCn.Open "Provider=Microsoft.ACE.OLEDB.12.0;" & _
"Data Source=" & shtSetting.Range("filePath").Value & ";" & _
"Extended Properties=Excel 12.0;"
strSQL = "Insert Into [Sheet1$] (" & _
"sr_no, process,employee_id,employee_name) Values (" & _
"'" & sr_no & "','" & process & "','" & emp_id & "','" & emp_name & "')"
oCn.Execute strSQL, r_status
oCn.Close
Set oCn = Nothing
问题是“有时”。你有时需要调查。是否有多个用户连接?当你插入记录吗?是在你追加记录的时候吗? –
我作为单个用户测试过这个问题,并且遇到了这个问题。有时更新,有时插入不起作用。 – Santosh