АлександрКа
Дата: 26.02.2007 19:06:30
| Михаил - супер программист |
Доброго времени суток!
Не подскажите как мне обеспечить загрузкув базу с клиента и выгрузку на клиента файлов через Web интерфейс?
Использую я Application Server -> Portal.
Сзаренее спасибо! |
Сделай сервлет(ы), который будет выгружать/загружать данные.
Для загрузки также можно использовать ADF JSF, есть там такой компонент.
Ну и создай портлет - и вызывай из него сервлеты загрузки/выгрузки файлов.
dkflbvbh
Дата: 27.02.2007 09:33:06
Вот например в случае если файл текстовый, то можно забрать так
FUNCTION GetXML (p_Method VARCHAR2, p_Req VARCHAR2) RETURN CLOB
IS
req utl_http.req;
resp utl_http.resp;
v_Result Clob;
v_Buf Clob;
BEGIN
req := utl_http.begin_request('http://'||v_Server||':8080/dadtest/'||p_Method||'?'||p_Req, 'POST','HTTP/1.0');
UTL_HTTP.SET_AUTHENTICATION(req,'tst','tst');
UTL_HTTP.Set_Header(req, 'Content-Type', 'text/xml; charset=utf-8');
BEGIN
resp := utl_http.get_response(req);
LOOP
utl_http.read_text(resp, v_Buf);
if v_Result is null then
v_Result := v_Buf;
else
v_Result := v_Result || v_Buf;
end if;
END LOOP;
EXCEPTION
WHEN utl_http.end_of_body THEN
utl_http.end_response(resp);
END;
DBMS_OUTPUT.Put_Line(to_char(resp.status_code));
RETURN v_Result;
END GetXML;
Но для бинарных файлов HTTP не лучший вариант, если проблема еще не решена, выложи подробней тех условия.