[求助]请高人帮助看看这是什么语言.怎么调用-->风月_无边转移
<P>请高人帮助看看这是什么语言.怎么调用.<BR><BR>现有一个SQL SCRPIT FILE.不知如何使用.请高人指点.<BR>DECLARE<BR> req utl_http.req;<BR> resp utl_http.resp;<BR> tmp VARCHAR2(1024);<BR> rvalue VARCHAR2(10000);<BR> params VARCHAR2(30000);<BR> TYPE srRecType IS RECORD(<BR> aa VARCHAR2(6),<BR> );<BR> bb_url VARCHAR2(100) := aa.com/j2ee/ag/AG3501/register.jsp';<BR> sr srRecType; <BR>BEGIN<BR> aa:= 'SNTSHA'; <BR> <BR> params := aa' || utl_url.ESCAPE(sr.aa)||'&'||</P><P>req := utl_http.begin_request(bb_url, 'POST');<BR> utl_http.set_header(req, 'User-Agent', 'Mozilla/4.0');<BR> utl_http.set_header(req, 'content-type', 'application/x-www-form-urlencoded');<BR> utl_http.set_header(req, 'content-length', length(params));<BR> utl_http.write_text(req, params);<BR> resp := utl_http.get_response(req);</P>
<P>BEGIN<BR> LOOP<BR> utl_http.read_line(resp, tmp, TRUE);<BR> <BR> IF TRIM(tmp) IS NOT NULL THEN<BR> rvalue := rvalue || tmp || chr(10);<BR> END IF;<BR> END LOOP;<BR> utl_http.end_response(resp);<BR> EXCEPTION<BR> WHEN utl_http.end_of_body THEN<BR> utl_http.end_response(resp);<BR> END;</P>
<P> -- Final Stage<BR> IF rvalue LIKE 'asdf%' THEN<BR> rvalue := replace(rvalue,chr(10),''); -- Chopping<BR> dbms_output.put_line(rvalue);<BR> ELSE<BR> raise_application_error(-20000, rvalue);<BR> END IF;<BR>END;</P> <P>楼主应该发到Oracle社区里<BR>这段代码是 Oracle 语句 <BR></P> 这个是oracle,在sqlplus里用@test.sql来调用。[em05]
回复：（ILoveMK）这个是oracle,在sqlplus里用@test.s...
<P>能否通过一段JAVASCRIPT调用</P> 应该不行，JAVASCRIPT是在客户端运行的吧。回复：（ILoveMK）应该不行，JAVASCRIPT是在客户端运行...
谢谢,大家指点 <P>你可以将它保存成.sql文本文件，然后CMD下登陆服务器<br>再<br>SQL>start file_name <br>SQL>@ file_name <br>来执行这个脚本；<br>当然，你也可以将它直接粘贴在SQL>下运行</P>这段主要是关于网页的，具体的作用不清楚，对网页制作不懂！<br><br>[align=right][color=#000066][此贴子已经被作者于2007-10-19 13:44:44编辑过][/color][/align]
回复：（飙马）你可以将它保存成.sql文本文件，然后CM...
<P>又学一招.谢谢.</P>页:
[1]