3
Druid_A
19.10.04
✎
11:15
|
Делай примерно так! А лучше посмотри книги там все есть.
ДБФ=СоздатьОбъект("XBase");
ПутьКЗаявкам=(КаталогИБ()+"zayavki.dbf");
Если ФС.СуществуетФайл(ПутьКЗаявкам)=0 Тогда
ДБФ.ДобавитьПоле("POST",2,35,0);
ДБФ.ДобавитьПоле("VREM",2,15,0);
ДБФ.ДобавитьПоле("TEKTIM",2,15,0);
ДБФ.ДобавитьПоле("NAMEUSER",2,20,0);
ДБФ.СоздатьФайл(ПутьКЗаявкам);
|
|