powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Запись строчки в текстовый файл
3 сообщений из 3, страница 1 из 1
Запись строчки в текстовый файл
    #33779320
Один из сотрудников в отпуск ушел, а мне на сопровождение осталась написаная им на foxpro 2.6 программа, которая сразу же начала глючить:) В фоксе слабо разбираюсь, кто может подсказать как записать (добавить) какую либо информацию в текстовый файл по ходу работы программы?
...
Рейтинг: 0 / 0
Запись строчки в текстовый файл
    #33779350
piva
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Set Text to MyFile.TXT On NoShow Additive
\Твоя строка
Set Text to
или
FOpen, FSeek, FWrite/FPuts, FClose
...
Рейтинг: 0 / 0
Запись строчки в текстовый файл
    #33779627
Valerii
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
Text_file = 'C:\test.txt'
hndl = FCREATE(Text_file,0)
IF hndl < 1
MESSAGEBOX('   Невозможно создать текстовый файл.',16+8+256,'Внимание')
RETURN
ENDIF
txtItemName = 'Твоя сторока1.... '
= FPUTS(hndl, 'S,1,______,_,__;'+CPCONVERT(1251, 866, Alltrim(txtItemName))

txtItemName = 'Твоя сторока2.... '
= FPUTS(hndl, 'S,1,______,_,__;'+CPCONVERT(1251, 866, Alltrim(txtItemName))

txtItemName = 'Твоя сторока3.... '
= FPUTS(hndl, 'S,1,______,_,__;'+CPCONVERT(1251, 866, Alltrim(txtItemName))
= FCLOSE(hndl)
Или в цикле запулить данные таблицы ...

CPCONVERT(1251, 866,'') -для досовских русских букв...

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


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