Добрый день!    
Вот код:

ОлеДБ = СоздатьОбъект("OLEDBData");
   Соединение = "Provider=VFPOLEDB.1;Data Source=" + КаталогИБ() + ";Mode=ReadWrite;Collating Sequence=MACHINE";
   Рез = ОлеДБ.Соединение(Соединение);
   Запрос = ОлеДБ.СоздатьКоманду();
   Запрос.Выполнить("EXECSCRIPT('SET ANSI OFF')");

Рез получает 1,тоесть как я понимаю соединение устанавливает,а когда пытаюсь выполинть анси оф - выкидыввает ошибку
Запрос.Выполнить("EXECSCRIPT('SET ANSI OFF')");
{R:\BASES\TEST\ITALAUTO\EXTFORMS\ПРЯМОЙЗАПРОСDBF.ERT(8)}: FAILED! ICommandText::Execute(): Variable '     ' is not found.

подскажите куда копать пожалуйста

vfp обновить

http://www.microsoft.com/downloads/details.aspx?FamilyId=E1A87D8F-2D58-491F-A0FA-95A3289C5FD4&displaylang=en

это терминал(

(3) и че ?

не дадут мне его обновить,будем локально корячить

В продолжении темы:
   Запрос = ОлеДБ.СоздатьКоманду();
     стрЗапрос = "    
   |Update РегВЗМ
   |SET
   |    $РегВЗМ.ВалютнаяВалюта  = :спрВалюта
   |FROM
   |    $Регистр.Взаиморасчеты as РегВЗМ
   |";
   
   Запрос.УстановитьТекстовыйПараметр("спрВалюта", спрВалюта);
   ТЗ =Запрос.ВыполнитьИнструкцию(стрЗапрос);  


Ошибка {D:\ITALAUTO\EXTFORMS\ПРЯМОЙЗАПРОСDBF.ERT(38)}: FAILED! ICommandText::Execute(): Cannot open file d:\italauto\ra267.dbf.
Это то почему?

ВалютнаяВалюта   - реквизит регистра

Используй 1SQlite и обновлять ничего не надо. Плюс в монопольном режиме будет работать

а так ты еще и писать туда собрался... главное insert не делай

(9) спасибо,я кажется в монопольном зашёл

(6) монопольно поди работаешь, да ?
:)))

Есжели да - ставь заплатку от hogik, которая позволяет работать запросам на фоксе в монопольном режиме

(11) ой да мне один запросик всего
и спасибо!!!