powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / выгрузить в файл с разделителем табулятор
15 сообщений из 15, страница 1 из 1
выгрузить в файл с разделителем табулятор
    #33273257
sti
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
попрошу не пинать. я в FoxPro вообще ноль.
Ниже кусок кода. Утверждается что это выгрузка в файл через разделитель пробел. Как сделать через разделитель табулятор?

Код: plaintext
1.
2.
3.
4.
5.
6.
DO WHILE  .NOT. EOF()
     ?    ALLT(SUBS(NAIM, 1 , 10 ));
     +' '+ALLT(SUBS(NAIM, 11 , 49 ));
     +' '+ALLT(ORGAN);
     +' '+ALLT(STR(CENA, 11 , 2 ));
     +' '+ALLT(STR(KOL, 9 , 3 ));
     +' '+ALLT(DTOC(SROK))
...
Рейтинг: 0 / 0
выгрузить в файл с разделителем табулятор
    #33273287
alex11100
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
вместо +' '+
+chr(9)+
...
Рейтинг: 0 / 0
выгрузить в файл с разделителем табулятор
    #33273320
sti
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
спасибо!
...
Рейтинг: 0 / 0
выгрузить в файл с разделителем табулятор
    #33273455
Komissar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
stiпопрошу не пинать. я в FoxPro вообще ноль.
А в дельфях, аксесах и эскюэлях разве нет чегой-то типа CHR()???
При чём тут фокс или не фокс?
...
Рейтинг: 0 / 0
выгрузить в файл с разделителем табулятор
    #33273456
alex11100
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
делов-то

вот проблема, так проблема
сижу - все понимаю - умный такой,
а делать нифига не хочется

поеду домой - посмотрю как мне строители дом строят
работа в лес не убежит
...
Рейтинг: 0 / 0
выгрузить в файл с разделителем табулятор
    #33273868
leaf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
COPY TO FileName
[FIELDS FieldList]
[Scope] [FOR lExpression1] [WHILE lExpression2]
[[WITH] CDX] | [[WITH] PRODUCTION]
[NOOPTIMIZE]
[[TYPE] [FOXPLUS | FOX2X | DIF | MOD
| SDF | SYLK | WK1 | WKS | WR1 | WRK | XLS | XL5
| DELIMITED [WITH Delimiter | WITH BLANK | WITH TAB]]]
[AS nCodePage]

ничего не меняется
тока редрика не видно
...
Рейтинг: 0 / 0
выгрузить в файл с разделителем табулятор
    #33273879
leaf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
WITH TAB
с табуляторами кажись
информация к размышлению есть
...
Рейтинг: 0 / 0
выгрузить в файл с разделителем табулятор
    #33273931
PaulWist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
leaf

А самому попробовать, прежде чем написать СOPY TO?
...
Рейтинг: 0 / 0
выгрузить в файл с разделителем табулятор
    #33274070
Crispy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
2 leaf :

В оригинале - первое поле разбивается вдобавок - на два. А потом, если COPY DELI WITH TAB - символьные поля получатся с дополнительными кавычками - по краям.
...
Рейтинг: 0 / 0
выгрузить в файл с разделителем табулятор
    #33274147
leaf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2PaulWist
день добрый
я на чем то прокололся?
пробывать лень чукча терь больше читатель
пятница вот....
с фискальным регистратором не работали ?
хотя в прочем всё зависит от модели....
от знака pi/2

2Crispy
сделайте выборку и пульните в файл
ну про кавычки ничего не скажу
не боролся с ними никогда
...
Рейтинг: 0 / 0
выгрузить в файл с разделителем табулятор
    #33274176
Crispy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
2 leaf :

Да мне оно как-то не надо, вроде бы :)
По поводу выборки - а как же с TAB-ами... Хотя... :) - пятница... (да и вроде не надо мне )
...
Рейтинг: 0 / 0
выгрузить в файл с разделителем табулятор
    #33274186
PaulWist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
leaf

вообщем Crispy уже напомнил про первое поле, а так же выборки подстрок из др полей, те такой код

Код: plaintext
1.
2.
3.
4.
5.
CREATE CURSOR test (First c( 20 ), s c ( 20 ))

INSERT INTO test (First, s) VALUES (' First record first field', 'first record econd field')
INSERT INTO test (First, s) VALUES (' second record first field', 'second record second field')

COPY TO c:\aaa.txt FIELDS LEFT(first,  10 ), LEFT(s,  10 ) WITH tab

не пройдет.

Как вариант, конечно можно выбрать в промежуточный курсор и затем оттуда засунуть в файл, но автор не показал дальнейшего кода обработки цикла

Код: plaintext
DO WHILE  .NOT. EOF()

и видимо замена кавычек на CHR ему вполне хватает.
...
Рейтинг: 0 / 0
выгрузить в файл с разделителем табулятор
    #33274514
GoshaS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
F=FCREATE('rezalt.txt')
IF F#- 1 
  do while !eof()
     FPUTS(F, ALLT(SUBS(NAIM, 1 , 10 )+chr( 9 )+ALLT(SUBS(NAIM, 11 , 49 )))
  enddo 
FCLOSE(F)
Так пишется файл моментально.
...
Рейтинг: 0 / 0
выгрузить в файл с разделителем табулятор
    #33274520
GoshaS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
как обычно поторопился и забыл добавить
Код: plaintext
ENDIF
...
Рейтинг: 0 / 0
выгрузить в файл с разделителем табулятор
    #33274666
Фотография Redrik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
leafничего не меняется
тока редрика не видно
Не плакай - тута я!

От Flex0 прячусь - я ему 5 тонн зелени уже месяц как должен, да еще плюс по счетчику - 2% в сутки... Прикинь!

P.S. А чё это вдруг ты меня тут вспомнил???
...
Рейтинг: 0 / 0
15 сообщений из 15, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / выгрузить в файл с разделителем табулятор
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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