Re: что могу сказать по сему поводу

Spearance 21.04.2003 07:02 / 21.04.2003 07:04

@changePic[name;dir]
$rootPath[$env:DOCUMENT_ROOT]
^if(def $form:photo){
^form:photo.save[binary;/$dir/images/${name}.jpeg]
$f[^file::exec[/../cgi-bin/images.pl;

$.stdin[] добавь обязательно

$.CGI_DESTINATION_PATH[/$rootPath/$dir/images]
$.CGI_SOURCE_PATH[/$rootPath/$dir/images]
$.CGI_IMAGE[${name}.jpeg]
]]
^file:delete[/$dir/images/${name}.jpeg]
}

На сколько я понял вы пытаетесь ресайзить картинку, но не указываете до какого размера. Попробуйте сделать изменения которые я внес, и начните проверять с $.stdin[]
Потом мне абсолютно непонятен смысл процедуры, вы закачиваете картинку, что-то с ней делаете и тут же ее удаляете. Где-то тут затаился подвох... или я че-то не понимаю.
$.CGI_SOURCE_PATH и $.CGI_DESTINATION_PATH по крайней мере должны быть разные, а ежели вы предполагаете что файл будет сам себя переписывать, то зачем тогда ^file:delete[...]

---