powered by simpleCommunicator - 2.0.56     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / dbf в txt
12 сообщений из 12, страница 1 из 1
dbf в txt
    #35884307
Kochegra
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Добрый день!
Подскажите. VFP9
Есть файл cbs.txt.
Дальше командой
append from cbs.txt type sdf - записываю содержимое в темповый dbf.
Далее командой replace изменяю некоторые строки в темповом dbf.
Вопрос. Как проделать обратную операцию?
Т.е. нужно измененный dbf залить в текстовый cbs.txt.
...
Рейтинг: 0 / 0
dbf в txt
    #35884333
KochegraДобрый день!
Подскажите. VFP9
Есть файл cbs.txt.
Дальше командой
append from cbs.txt type sdf - записываю содержимое в темповый dbf.
Далее командой replace изменяю некоторые строки в темповом dbf.
Вопрос. Как проделать обратную операцию?
Т.е. нужно измененный dbf залить в текстовый cbs.txt.
Код: plaintext
Export to ...
...
Рейтинг: 0 / 0
dbf в txt
    #35884334
Kochegra
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Кстати, данный подход взял из одной програмки под foxpro 2.6.
procedure cbsini
select 0
select temp
zap
append from cbs.txt type sdf
go 6
replace txt with 'ADDR_PLAT = '+tmp->adres
... и т.д.
***запись в файл
ii =writefl('c:\Work\icmnew\MMBANK.WIN\data\users\default\cbs.ini',chr(13)+chr(10),'')

Что за writefl не очень понятно. Но в VFP9 на эту строчку ругается, а 2.6 реально отрабатывает. Функцию такую не нашел.
...
Рейтинг: 0 / 0
dbf в txt
    #35884338
Kochegra***запись в файл
ii =writefl('c:\Work\icmnew\MMBANK.WIN\data\users\default\cbs.ini',chr(13)+chr(10),'')

Что за writefl не очень понятно. Но в VFP9 на эту строчку ругается, а 2.6 реально отрабатывает. Функцию такую не нашел.
Это какай-то самописная функция. Искать надо в *.prg файлах.
...
Рейтинг: 0 / 0
dbf в txt
    #35884356
Kochegra
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
проходящий.,
В том то и дело, не могу найти и все. Я тоже так подозревал, но найти не могу.
...
Рейтинг: 0 / 0
dbf в txt
    #35884362
Kochegraпроходящий.,
В том то и дело, не могу найти и все. Я тоже так подозревал, но найти не могу.
Ну так берется FPD 2.6, открывается окно Trace, ставится точка останова на строке с вызовом искомой функции и запускается прога.
...
Рейтинг: 0 / 0
dbf в txt
    #35884367
Dinozavr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Kochegra
Что за writefl не очень понятно. Но в VFP9 на эту строчку ругается, а 2.6 реально отрабатывает. Функцию такую не нашел.
Возможно, это функция из процедурного файла (т.е. того, что задается через SET PROCEDURE) или из головной (main) программы.
Попробуйте поискать файлы с текстом "writefl ". Если это функция из процедурного файла или из головной программы, то ее имя должно быть в тексте соответствующего prg-файла. Во всяком случае, Вы найдете не только те файлы, где ее вызывают, но и тот файл, где она описана.
Наилучшие пожелания.
...
Рейтинг: 0 / 0
dbf в txt
    #35884369
Dinozavr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Kochegra
Что за writefl не очень понятно. Но в VFP9 на эту строчку ругается, а 2.6 реально отрабатывает. Функцию такую не нашел.
Возможно, это функция из процедурного файла (т.е. того, что задается через SET PROCEDURE) или из головной (main) программы.
Попробуйте поискать файлы с текстом "writefl ". Если это функция из процедурного файла или из головной программы, то ее имя должно быть в тексте соответствующего prg-файла. Во всяком случае, Вы найдете не только те файлы, где ее вызывают, но и тот файл, где она описана.
Наилучшие пожелания.
...
Рейтинг: 0 / 0
dbf в txt
    #35884467
Kochegra
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вначале проги есть
load filefnc.binЧто это означает?

Процедуру тоже нашел, непонятно с filefnc. Файл есть, но для чего?
procedure writefl
parameters namefl,psvk,stab
dd= 'OPEN '+namefl
call filefnc with dd
go top
do while !eof()
scat to mm
i = 1
***запись в файл
do while i <= fcount()
dd= 'WRITE '
stxt = rtrim(mm(i))
if len(stxt) = 0
stxt = ''
endif
stxt = stxt+iif(i<fcount(),stab,psvk)
sdd = dd + stxt
call filefnc with sdd i =i+1
enddo
skip
enddo
dd = 'CLOSE '
CALL FILEFNC WITH DD
return(0)
...
Рейтинг: 0 / 0
dbf в txt
    #35884486
Dag
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
LOAD Places a binary file in memory.
CALL Executes a binary file that has been placed in memory with LOAD.
...
Рейтинг: 0 / 0
dbf в txt
    #35884580
q1w1e1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Тут просто надо иметь опыт работы с чужим кодом....чтоб найти эту строчку, в каком файле она находится(writef), я обычно запускаю FAR, отмечаю область поиска и провожу поиск строки в этой области, потом поиск этого файла, откуда он вызывается и т.д...
...
Рейтинг: 0 / 0
dbf в txt
    #35884686
Burn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
KochegraВначале проги есть
load filefnc.bin
Что это означает?

Как тут уже сказали - вызов двоичной библиотеки. Обычно пишется на С или Assembler и используется для обращения к системным вызовам DOS. Исходный код получить нельзя. Можно только дезассемблировать. Под Виндой часто невызывается и ведет к подвисанию...

Kochegracall filefnc with dd
Ну а это вызов процедуры, содержащейся в bin-файле
...
Рейтинг: 0 / 0
12 сообщений из 12, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / dbf в txt
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]