С помощью скрипта пытаюсь обновить данные в DBF файле, подключенного через ODBC.
И запуская скрипт выходит ошибка: Произошли ошибки во время выполнения многошаговой операции OLE DB.
Сам скрипт вот:
Option Explicit
Const adOpenStatic = 3
Const adLockOptimistic = 3
Const adPersistXML = 1
Dim objConnection
Dim objRecordSet
Dim Fso
Dim strFileName
Set objConnection = CreateObject("ADODB.Connection")
Set objRecordSet = CreateObject("ADODB.Recordset")
Set Fso = CreateObject("Scripting.FileSystemObject")
objConnection.Open "data"
With objRecordSet
.Open "SELECT * FROM data where id=25 ", objConnection, adOpenStatic, adLockOptimistic
.AddNew
.Fields("memo") = "Sample text"
.Update
End With
objRecordSet.Close
objConnection.Closeданным скриптом пытаюсь обновить поле в таблице. Сама база есть нечто иное как DBF файл - подключенный через ODBC и в скрипте указан как DATA, режим read/write
подскажите пожалуйста - как от ошибки избавится или может быть другой способ имеется - чтоб обновлять данные через VBS.
]]>