Мемо поля в ДБФ - как с ними работать? #113972

В ДБФ вообще не силен поэтому расскажу своими словами:Есть таблица ДБФ создана под FoxPro - есть в этой таблице memo поле - вот никак не разберучсь как значение этого поля получить. Похоже что это значение записано в другой таблице, но не вижу поля для связи.

Да, значения memo-полей записаны в другом файле.Объект 1С XBase с memo-полями не работает.

memo поля не поддерживаются.

только читать заголовок ДБФ, находить мемо поля и считывать их из файла ИмяДБФ.fpt, короче писать самому процедуру работы с таблицами ДБФ...

файл fpt нашел вроде с данными похожеми на правдуа в какую сторону копать ?т.е. как теперь из этого файла получить соответсвие записей?

ищешь байт с кодом 1 (назовем байт Ах) из четвертого от него читаешь длинну (байт ByteSize) и все последующие байты по N(ByteSize) будут инфой... какая инфа по порядку от начала сказано в ДБФ...

+ и так читаешь весь файл в цикле...

В понедельник думаю опубликую "полноечтенье" Дбф в 1Сэ... (если не лень будет)

у как все запущено :)а ничего попроще нет?в блокноте этот файлик открывается вроде в читаемом виде вот думаю если там строки идут в такомже порядке как и в дбф - то может что получится?

нет если поле меняется, то создается новая запись в fpt и соответственно меняется номер начального байта в ДБФ, потому файлы с мемо полями надо сжимать...

т.е. можно отказаться от затеи выловить это поле, или ждать понедельникаОК"В понедельник думаю опубликую "полноечтенье" Дбф в 1Сэ" - это как и где?

+ поправлюсь - номер байта от начала файла fpt, записывается в соответствующую запись ДБФ

счас дам код на ВБС, просто читает все записи (нужные и не нужные) из файла fpt

Одолели, еще и сайт правь (сделан еще так что фих изменения/дополнения внесешь, впору самому переделывать)+ Тупенько, в понедельник на 1Сэ код дам чтения ДБФ+Мемо...const ForReading=1if WScript.Arguments.count>0 thenFileMemo=WScript.Arguments.Itemelsedo while Not f.AtEndOfStream    if ByteSizeLong>0 and ByteSizeLong<CLng("&HFFFF") then

Можно поставить FoxPro и по ОЛЕ его заставить работать.

smaharbA, жду :)

ой как все сложно...Через ADO все не так страшно, но тоже все получается ))

поделись примерчиком тогдаADO - дрова нужны - какие, где брать?

Посмотри на Proclub - где-то была хорошая обработка для формирования SQL запросов к внешним базам данных...

вечером, счас времени 0, попробовал 13?

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

Вобщем поискал на проклубе по DBF и SQLНашел два отдельных приложения - одно нормально читает мемо поля, но из него ничео не сохранитьвобщем ниего хорошего.

а в чем проблема - дорисовать кнопку "Сохранить"? ТЗ в текстовый файл перегнать?...

так EXE + dll

http://1c.proclub.ru/modules/mydownloads/personal.php?cid=6&lid=2163

действительно, exe - это плохо ))Я не то имела ввиду. Сейчас вот еле нашла - почему-то в запросы по сайту это не попадает - нашла по e-mail автора.http://1c.proclub.ru/modules/mydownloads/personal.php?cid=83&lid=1789

а теперь такой вопрос :)есть dbf таблица xBase4 вроде - из программы по первой ссылке я её вижу.Как прогу из второй ссылки подключитьВыбираю "Provider=MSDASQL.1;Persist Security Info=False;Data Source=dBASE Files;Initial Catalog=S:platwin5platwin5"строка подключенияв запросе пишу:"select * from table_2"в итоге имею:Microsoft OLE DB Provider for ODBC Drivers: [Microsoft][Драйвер ODBC dBase] Непредвиденная ошибка драйвера внешней базы данных (8961)..что не так?

up

ВсегоЭлементов - это что?количество записей в таблице?

ну это уже понятнееа попроще чего?это ж надо будет обратно читать из 4000 текстовых файлова в один файл засунуть?

Если тебе приоткрыли щелочку двери, не надо туда тут же нагло пихать всю ногу...

:)красавицы, ну не хватает мне этой щелочки, нет сейчас времени разбираться что к чему.Я понял что Фокс=СоздатьОбъект("VisualFoxPro.Application");и что Фокс.DoCmdно что бы разобраться что писать в (*) - это ж сколько времени понадобитсяу меня сейчас стоит задача прочитать мемо поля, пока сказал заказчику что никак. (ну никак так никак)что ж надо будет - теперь спасибо вам знаю куда копать и где искать

up