Mega Code Archive

 

Categories / Oracle PLSQL / System Packages

 

Use UTL_TCP package

set echo on set serveroutput on size 200000 DECLARE   v_Connection UTL_TCP.CONNECTION;   v_NumWritten PLS_INTEGER; BEGIN   v_Connection := UTL_TCP.OPEN_CONNECTION('www.oracle.com', 80);   v_NumWritten := UTL_TCP.WRITE_LINE(v_Connection, 'GET / HTTP/1.0');   v_NumWritten := UTL_TCP.WRITE_LINE(v_Connection);      BEGIN     FOR v_Count IN 1..10 LOOP       DBMS_OUTPUT.PUT_LINE(UTL_TCP.GET_LINE(v_Connection, TRUE));     END LOOP;   EXCEPTION     WHEN UTL_TCP.END_OF_INPUT THEN       NULL;   END;      UTL_TCP.CLOSE_CONNECTION(v_Connection); END; /