Acessando uma URL com o Oracle Forms 6i

CREATE OR REPLACE PROCEDURE acessa_url (v_endereco IN VARCHAR2,
                                        v_pagina OUT VARCHAR2)
IS
  req   utl_http.req;
  resp  utl_http.resp;
  linha VARCHAR2(1024);
BEGIN
  utl_http.set_proxy(‘10.1.2.188:8080’);
  req := utl_http.begin_request(v_endereco);
  resp := utl_http.get_response(req);
  v_pagina := ”;
  LOOP
    utl_http.read_line(resp, linha, TRUE);
    v_pagina := v_pagina || linha;
  END LOOP;
  utl_http.end_response(resp);
EXCEPTION
  WHEN utl_http.end_of_body THEN
    utl_http.end_response(resp);
END;

Deixe um comentário

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *

Rolar para cima