powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / помогите перевести из dbf в txt
8 сообщений из 8, страница 1 из 1
помогите перевести из dbf в txt
    #34457196
Каринка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Доброго всем дня...
Помогите самоучке перевести файл из dbf в txt
запуталась совсем...
...
Рейтинг: 0 / 0
помогите перевести из dbf в txt
    #34457201
Каринка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
вроде много чего написано и расписано но в основном из txt в dbf
...
Рейтинг: 0 / 0
помогите перевести из dbf в txt
    #34457222
alex11100
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
в каком виде ???

Код: plaintext
1.
2.
3.
4.
create cursor tt (n i)
insert into tt values( 1 )
insert into tt values( 2 )
copy to c:\tt.txt delimited

см. хелп по copy to
...
Рейтинг: 0 / 0
помогите перевести из dbf в txt
    #34457262
Каринка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
нет copy to не подходит....
мне только бы понять почему после первой строчки вторая гдето теряется....
...
Рейтинг: 0 / 0
помогите перевести из dbf в txt
    #34457268
Каринка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
текст такой...
=fwrite(f1, rtrim(vvv&ww..naimen_a))
=fputs(f1, space(40))
=fputs(f1," èíäåêñ êîë-âî âàã íàçíà÷åíèå íà ñòàíöèè íàçíà÷åí. íà äðóãèå ")
=fputs(f1," ïîåçäà â ïîåçäå ñîáñòâåííîãî îòäåëåíèÿ ÄÍ (èëè òðàíçèò) ")
=fputs(f1," ãðóæ ïîð ñòàíöèÿ ãðóæ ñòàíöèÿ ïîð ÄÍ ãðóæ ïîð ")

go top

=fwrite(f1, rtrim(vvv&ww..ind))
=fwrite(f1, rtrim(vvv&ww..gruzh))
=fwrite(f1, rtrim(vvv&ww..porozh))
=fwrite(f1, rtrim(vvv&ww..grstsv_nai))
=fwrite(f1, rtrim(vvv&ww..grstsv_nv))
=fwrite(f1, rtrim(vvv&ww..porstsv_na))
=fwrite(f1, rtrim(vvv&ww..porstsv_nv))
на самом деле в таблице несколько записей в этой страной...а записывает только одну первую строчку...
может я что то не так поняла....
...
Рейтинг: 0 / 0
помогите перевести из dbf в txt
    #34457274
Каринка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
ой...русский какой то получился...попробую перекодировать....

индекс кол-во ваг назначение на станции назначен. на другие
поезда в поезде собственного отделения ДН (или транзит)
груж пор станция груж станция пор ДН груж пор
...
Рейтинг: 0 / 0
помогите перевести из dbf в txt
    #34457297
-=AlexiS=-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ну а сколько же строк должно быть , если в приведенном вами коде нет передвижение по таблице ?
наверно типа так
scan
=fwrite(f1, rtrim(vvv&ww..ind))
=fwrite(f1, rtrim(vvv&ww..gruzh))
=fwrite(f1, rtrim(vvv&ww..porozh))
=fwrite(f1, rtrim(vvv&ww..grstsv_nai))
=fwrite(f1, rtrim(vvv&ww..grstsv_nv))
=fwrite(f1, rtrim(vvv&ww..porstsv_na))
=fwrite(f1, rtrim(vvv&ww..porstsv_nv))
=fwrite(f1, chr(13)+chr(10))
endscan

PS какая версия фокса ? в VFP по моему начиная с 6 есть strtofile()
...
Рейтинг: 0 / 0
помогите перевести из dbf в txt
    #34457942
Каринка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
для -=AlexiS=-
ОБОЖАЮ тебя...за твою голову....
спасибочки, помог....
...
Рейтинг: 0 / 0
8 сообщений из 8, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / помогите перевести из dbf в txt
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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