http://www.sqle.ru/index.php?action=history&feed=atom&title=Oracle_PL%2FSQL%2FSystem_Packages%2FUTL_TCP 2026-05-24T06:05:50Z История изменений этой страницы в вики MediaWiki 1.30.0 http://www.sqle.ru/index.php?title=Oracle_PL/SQL/System_Packages/UTL_TCP&diff=1262&oldid=prev 2010-05-26T13:45:19Z

<p></p> <table class="diff diff-contentalign-left" data-mw="interface"> <tr style="vertical-align: top;" lang="ru"> <td colspan="1" style="background-color: white; color:black; text-align: center;">← Предыдущая</td> <td colspan="1" style="background-color: white; color:black; text-align: center;">Версия 13:45, 26 мая 2010</td> </tr><tr><td colspan="2" style="text-align: center;" lang="ru"><div class="mw-diff-empty">(нет различий)</div> </td></tr></table>

http://www.sqle.ru/index.php?title=Oracle_PL/SQL/System_Packages/UTL_TCP&diff=1263&oldid=prev 2010-05-26T09:55:22Z

<p>1 версия</p> <p><b>Новая страница</b></p><div>==Use UTL_TCP package.==<br /> <br /> <br /> <br /> <br /> &lt;!-- start source code --&gt;<br /> <br /> &lt;source lang=&quot;sql&quot;&gt;<br /> <br /> set echo on<br /> set serveroutput on size 200000<br /> DECLARE<br /> v_Connection UTL_TCP.CONNECTION;<br /> v_NumWritten PLS_INTEGER;<br /> BEGIN<br /> v_Connection := UTL_TCP.OPEN_CONNECTION(&quot;www.oracle.ru&quot;, 80);<br /> v_NumWritten := UTL_TCP.WRITE_LINE(v_Connection, &quot;GET / HTTP/1.0&quot;);<br /> v_NumWritten := UTL_TCP.WRITE_LINE(v_Connection);<br /> <br /> BEGIN<br /> FOR v_Count IN 1..10 LOOP<br /> DBMS_OUTPUT.PUT_LINE(UTL_TCP.GET_LINE(v_Connection, TRUE));<br /> END LOOP;<br /> EXCEPTION<br /> WHEN UTL_TCP.END_OF_INPUT THEN<br /> NULL;<br /> END;<br /> <br /> UTL_TCP.CLOSE_CONNECTION(v_Connection);<br /> END;<br /> /<br /> <br /> <br /> &lt;/source&gt;</div>

Admin