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


Список сообщений | Написать новое | Ответить на сообщение | Домой Поиск:
Предыдущее сообщение | Следующее сообщение
From : KAA
To : Roman Popov
Subj : А как в рексе прочитать графический файл и передать его +
> > > броузеру ? В html <img src="/cgi-bin/script.cmd">
> > >
> > > такой перлоподобный текст
> > >
> > > rc = STREAM(image,"C","OPEN READ")
> > > img = CHARIN(image,1,STREAM(image,"C","query size"))
> > > rc = STREAM(image,"C","CLOSE")
> > > say 'Content-Type: image/png'; say ""; say "";
> > > rc = charout( STDOUT, img)
> > >
> > > не работает, т.е работает, но браузер картинку не рисует. Если выбрать "показать изображение" то выводится содержимое файла картинки как текст. Спасибо.

Лишний say

img = charin(gif,,chars(gif))
say 'Content-Type: image/gif'
say
call charout stdout, img

работает нормально


Fri 26 Jul 2002 17:42 Mozilla/4.0 (compatible; MSIE 5.0; Windows 95) Opera 5.12 [



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.