1 Тема от Space-06

  • Space-06
  • Участник
  • Неактивен

Тема: VBS: Ошибка OLE DB

Доброго времени суток уважаемые форумчане!!!

С помощью скрипта пытаюсь обновить данные в 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.