RU/2: Форум. Общение пользователей и разработчиков OS/2 (eCS). : Как из рекса прочитать файл целиком в одну переменную ?


Список сообщений | Написать новое | Ответить на сообщение | Домой Поиск:
Предыдущее сообщение | Следующее сообщение
From : konst
To : Roman Popov
Subj : Как из рекса прочитать файл целиком в одну переменную ?
Что ты имеешь ввиду?
Если хочешь присвоить переменной имя файла, то:
file_name='имя_файла(можно_с_путем)'
или
file_name=path||'имя_файла'
где path='путь'

Если хочешь ТЕКСТОВЫЙ файл, т.е. его содержимое запихнуть в переменную, то можно так:
/**/
xxx=''/*твоя переменная, делаем ее пустой*/
file_name=path||'имя_файла'/*задаем имя файла*/
do while lines(file_name)<>0/*цикл будет перебирать твой ТЕКСТОВЫЙ файл построчно*/
inl=linein(file_name)/*Читаем (каждую строчку)*/
xxx=xxx||inl/*переменной xxx приклеиваем содержимое строчки*/
end
rcs=stream(file_name,'c','close')/*закрываем поток*/
/*Теперь, переменная xxx содержит твой файл.
Делай с ней что хочешь. Хочешь c2x(), хочешь say xxx ...*/
exit

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

Mon 08 Apr 2002 13:34 Mozilla/4.61 [en] (OS/2; I)



Programmed by Dmitri Maximovich, Dmitry I. Platonoff, Eugen Kuleshov.
25.09.99 (c) 1999, RU/2. All rights reserved.
Rewritten by Dmitry Ban. All rights ignored.