Существует книга Excel, которая используется как база данных, хранящаяся в общей папке. У пользователей есть другая рабочая книга, в которой есть пользовательская форма, которая позволяет вставлять и обновлять базу данных.Excel workbook as database, insert update issue
Я использую способ для вставки и обновления и использования 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