请问
oracler如何调用一个带参数的JSP网页,
请问
oracler如何调用一个带参数的JSP网页,
请问
oracler如何调用一个带参数的JSP网页,
有没有人知道啊,帮忙看看,我们想用在过程里执行一个网页,并且带参数
通过如下代码调用一支网页程序,执行网页的时候在本机的TOMCAT服务器是有这一
串'con1='||P_CARRYS_NO||'&
carrys_cat='||P_CARRYS_CAT||'&carrys_fct='||P_CARRYS_FCT||'&
carrys_no='||P_CARRYS_NO||'&carrys_itm='||P_CARRYS_ITM||'&
carrys_mno='||P_CARRYS_MNO||'&carrys_nm='||P_CARRYS_MNM||'&
carrys_qty='||P_CARRYS_QTY||'&carrys_unit='||P_CARRYS_UNIT||'&
amp;carrys_odr='||P_CARRYS_ODR||'& o_carrys_cat='||P_OCARRYS_CAT||'&
o_carrys_fct='||P_OCARRYS_FCT||'&o_carrys_no='||P_OCARRYS_NO||'&
amp;o_carrys_itm='||P_OCARRYS_ITM;参数过来的。但是放到正式的JBOSS服务器
就没有接收到参数。
主体代码:
REQ UTL_HTTP.REQ;
RESP UTL_HTTP.RESP;
URL VARCHAR2(2000);
value varchar2(1024);
VALUE1 varchar2(1024);
v_code_no VARCHAR2(10);
v_code_err VARCHAR2(1000);
V_EXPTION EXCEPTION;
SVURL VARCHAR2(100);
L_CLOB CLOB;
L_BLOB BLOB;
V_QTY VARCHAR2(20);
function clob2blob(v_clob_in in clob) return blob is
v_file_blob blob;
v_file_size integer := dbms_lob.lobmaxsize;
v_dest_offset integer := 1;
v_src_offset integer := 1;
v_blob_csid number := dbms_lob.default_csid;
v_lang_context number := dbms_lob.default_lang_ctx;
v_warning integer;
begin
select nls_charset_id('UTF8') into v_blob_csid from dual;
dbms_lob.createtemporary(v_file_blob, true);
dbms_lob.converttoblob(v_file_blob,v_clob_in,v_file_size,v_dest_offset,v_src_offset,v_blob_csid,v_lang_context,v_warning);
return v_file_blob;
exception
when others then
DBMS_OUTPUT.PUT_LINE('Error found');
end;
SVURL:= 'http://172.17.11.139/test/testhttp.jsp';
REQ := UTL_HTTP.BEGIN_REQUEST(SVURL,'POST','HTTP/1.1');
utl_http.set_header(req,'Content-Type','application/x-www-form-urlencoded');
--參數傳入
L_CLOB :=
'con1='||P_CARRYS_NO||'&carrys_cat='||P_CARRYS_CAT||'&carrys_fct='||P_CARRYS_FCT||'&carrys_no='||P_CARRYS_NO||'&carrys_itm='||P_CARRYS_ITM||'&carrys_mno='||P_CARRYS_MNO||'&carrys_nm='||P_CARRYS_MNM||'&carrys_qty='||P_CARRYS_QTY||'&carrys_unit='||P_CARRYS_UNIT||'&carrys_odr='||P_CARRYS_ODR||'&o_carrys_cat='||P_OCARRYS_CAT||'&o_carrys_fct='||P_OCARRYS_FCT||'&o_carrys_no='||P_OCARRYS_NO||'&o_carrys_itm='||P_OCARRYS_ITM;
--轉成BLOB
L_BLOB:= CLOB2BLOB(L_CLOB);
utl_http.set_header(req, 'Content-Length', length(l_blob)); --不可少
utl_http.set_header(req, 'Content-Type', 'text/html;
charset=UTF-8'); --要放到參數傳入後面
UTL_HTTP.WRITE_RAW(REQ, L_BLOB);
RESP := UTL_HTTP.GET_RESPONSE(REQ);
-- DBMS_OUTPUT.PUT_LINE(L_CLOB);
LOOP
UTL_HTTP.READ_LINE(RESP, VALUE, TRUE);
DBMS_OUTPUT.PUT_LINE('ssssssssssssssssssssss');
if(length(value)> 0) then
EXIT;
end if;
END LOOP;
DBMS_OUTPUT.PUT_LINE('fdafdafdafdafdafd');
UTL_HTTP.END_RESPONSE(RESP);