V7. Dbf установка на запись

  • Автор темы Stim
  • Дата начала
S

Stim

#1
Код:
ДБФ = СоздатьОбъект("XBase");
ИмяФайла = "";
ИмяПути = "";
ИмяКаталога="";
Фс.ВыбратьКаталог(ИмяКаталога,"Выберите с файлами",);
ОткрытьФайл("owner.DBF",ИмяКаталога);	
Справ=СоздатьОбъект("Справочник.Alco_Фирма");
Справ.НайтиПоКоду(1);
ДБФ.ОчиститьФайл();
ДБФ.OW_KOD=1;
ДБФ.Записать();
Выдается ошибка
ДБФ.OW_KOD=1;
{D:\1C\DEMODB_2\EXTFORMS\ALCO.ERT(816)}: Перед выполнением операции установите объект на запись!
 

vbs

Well-known member
18.02.2007
1 708
1
#2
ДВФ.ADD() сначала надо сделать, иначе записей в файле нет (сам ведь ZAP сделал)
 

vbs

Well-known member
18.02.2007
1 708
1
#3
и к тому же поле OW_KOD определить надо (файл-то пустой !)
ДБФ.AddField("OW_KOD", ТИП,ДЛИНА,ТОЧНОСТЬ);


а перед добавлением записи (ADD)
ДБФ.CreateFile(ИмяФайла,);

а перед добавлением записи (ADD)
ДБФ.CreateFile(ИмяФайла,);
 
S

Stim

#4
Спасибо. ADD() помогло. а файл был уже с готовыми полями...