Сдрасте)) Вопрос Идиота. Не подскажете возможно ли каким-либо образом получить данные об имени полей dbf-файла????типо dbf-veawer. чтобы ручками не вводить кждый раз???

ты не поверишь

(0) да

Ну хоть на статью какую нить отправьте)))

примерно тут:
Книга знаний: Пример работы с файлами DBF по интерфейсу ADO
а вообще-то в нижней строке окна браузера, Книга знаний

СП

и ЖКК :)

ну я так и понял, что через XBase не получится...

(7) может и получиться..
почитай про ОписаниеПоля(......)

(7) ПолучитьЗначениеПоля чем не устраивает ?!

(7) смотри ОписаниеПоля

имена знать вообще не обязательно, если что..

(10) ты что?! Это же мужика в кепке в пофигураторе спрашивать надо, боязно автору СП открывать, вдруг чего прочитает лишнего, ненароком

(11) Я просто Унифицировать хотел.. А без имен нереально ж вроде доступ получить.. Ну по крайней мере так в ЖКК написано)))

извлеки все поля в ТЗ (или СЗ), и ей пользуйся

(13)

ПолучитьЗначениеПоля(<?>)
Синтаксис:
ПолучитьЗначениеПоля(<НазваниеПоля>)
Назначение:
Возвращает значение поля.
Параметры:
<НазваниеПоля> - выражение с названием поля или с номером поля


повторяю: или с номером поля, как слышно, приём

(15). Слышно отлично, Спасибо я  понял)))) разберусь хоть  со всем этим))))

(15) ему надо вот позарез имена :)

а вообще-то интересно.. из ДД вытащить имена полей, и по ним читать дбф.. заодно - русские наименования вытаскивать..
логично :)

(11) эх
Функция ВыгрузитьДБФвТЗ(базаДБФ)
   
   Перем Тип, Название, Длина, Точность;
   
   ТЗ = СоздатьОбъект ("ТаблицаЗначений");    
   //заполняем структуру ТЗ
   Для инд = 1 По базаДБФ.КоличествоПолей() Цикл
       базаДБФ.ОписаниеПоля(инд, Название, Тип, Длина, Точность);
       Если (Число(Тип) = 1) или (Число(Тип) = 5) Тогда
           ТЗ.НоваяКолонка(СокрЛП(Название),"Число",Число(Длина),Число(Точность),,,,);
       ИначеЕсли Число(Тип) = 2 Тогда
           ТЗ.НоваяКолонка(СокрЛП(Название),"Строка",Число(Длина),,,,,);
       Иначе
           ТЗ.НоваяКолонка(СокрЛП(Название),,,,,,,);
       КонецЕсли;
   КонецЦикла;    
   //заполняем данные в ТЗ
   Для индСтрока = 1 По базаДБФ.КоличествоЗаписей() Цикл
       ТЗ.НоваяСтрока();                                                                
       базаДБФ.Перейти(индСтрока);
       Для индКолонка = 1 По базаДБФ.КоличествоПолей() Цикл      
           ТЗ.УстановитьЗначение(индСтрока, индКолонка, базаДБФ.ПолучитьЗначениеПоля(индКолонка));
       КонецЦикла;  
   КонецЦикла;      
   
   базаДБФ.ЗакрытьФайл();

   Возврат ТЗ;

КонецФункции

(19) избалуешь ребенка :)

(20) добрый я понедельник, расслабленный :)

офф: Народ, а по ADO читать DBF быстрее? ...а 1sqlite умеет "левые" DBF  читать?

И где ДенисЧ с предложением "купить СП"?
неужели я усмею предложить СП первым?

(22) гораздо быстрее, фоксовый провайдер умеет

(23) см. (5), тундра :)

(25) Судя по дальнейшему топику, СП у ТС украли..
ДенисаЧ нету, поэтому моя очередь предлагать купить СП...

(24) ну вот запутал ты меня запятой своей :)

(27) А представь, что вместо запятой была бы @ :-)))

(26) а потом, главное: "в 10 минут успеть добежать до канадской границы!" :)

(28) ну, здесь как раз я-бы наверное интерпретировал ее как AND ...даже не знаю почему :)

зы сейчас попробовал через АДО - ну и тормоз, хБэйз однозначно пошустрее будет :) ...ну или я его готовить не умею

(19),(20) Я уже написал что-то подобное)))))
Функция КакойТип(Тип)
   ВТип ="";
   Если Число(тип) = 1 Тогда
       ВТип ="Строка";
       Возврат  ВТип ;
   ИначеЕсли Число(тип) = 2 Тогда
ВТип ="Число";
       Возврат  ВТип ;
ИначеЕсли Число(тип) = 3 Тогда
ВТип ="Дата";
       Возврат  ВТип ;
ИначеЕсли Число(тип) = 4 Тогда
ВТип ="Логическое";
       Возврат  ВТип ;
ИначеЕсли Число(тип) = 5 Тогда
ВТип ="Число";
       Возврат  ВТип ;
   КонецЕсли;
КонецФункции

Процедура ОткрытьДБФ ()
    НазП ="";
    ТипП ="";
    ДлинаП = 0;
    ТочностьП = 0;
   файл = СоздатьОбъект("XBase");
   файл.ОткрытьФайл("D:\TempResourses\FONDY\DRAG.dbf");
   Для  й = 1 по файл.КоличествоПолей() Цикл
        файл.ОписаниеПоля(й,НазП,ТипП,ДлинаП,ТочностьП);
        ТЗПоля.НоваяКолонка(НазП,КакойТип(ТипП), ДлинаП, ТочностьП);
   КонецЦикла;
   
   
КонецПроцедуры

http://zalil.ru/32101681
на вот .. развлекайся

(32) вот спасибо, ща погляжу ;)

+33 это-ж Microsoft OLE DB Provider ставить надо...

(34) и ? Доступ к сайту мелкомягких закрыт шо ле ?

Не хочу создавать ради одного вопроса новую ветку. Подскажите такое дело.. Значит выбираю в реквизите диалога справочники.. Какая предопределенная процедура вызыввается когда выбираю определенный справочник????

(36)Не порти ветку :)
Создай новую, вопрос перефразируешь, а то нечегонепонятно :)

(36) перед - ПриНачалеВыбораЗначения, после - ОбработкаВыбораЗначения и формула в реквизите диалога

(35) не в этом дело, себе-то я поставлю - не вопрос, а вот клиенту - вопрос ...короче, пусть ждут-мучаются ;)

Значит так вопрос по теме. Я как понимаю таблицы dbf  из fox pro который дос только oledb можно перекинуть ибо там же индексные файлы...

(40) Индексные файлы не при чем - ты их сам можешь создать.

(40) не только

(38) Ёп, ты  ПоставщикДанных (ну, или чистое ТП) - используешь?
Если да, то есть вопрос (лучше по аське)

(43) аськи нету ..а ТП использую без классов, если ты об этом.

(44) жаль, что аськи нет.
посоветуй, как при начале редактирования ячейки - отменить редактированеие ее, и перейти на редактирование другой (другого типа).
(цель - типа принудительного заполнения обязательных полей)

(45) ПослеРедактированияЗначения
в этом событии надо рулить

http://www.1cpp.ru/forum/YaBB.pl?num=1288774760/65#65

(46) ПослеРедактирования - наверное уже поздно...
Надо ПриНачалеРедактирования
ОтменитьРедактированиеЗначения - сейчас попробую, спасибо

(48) ОтменитьРедактированиеЗначения - работает. спасибо. апдейт к доке я, естественно, не читал :-(
При назначении другой колонки - ТекущейКолонкой, редактированию предлагается значение  старой колонки, но в новой (принадлежащей новой колонке) ячейке... :-(
http://www.1cpp.ru/forum/YaBB.pl?num=1285520767/495#495

(42) т.е. xthtp XBase можно???? я просто обработку почти написал переделывать не очень хочется