Bom pessoal

não sei se este grupo estah habilitado para envio de anexos, mas estou 
encaminhando 2 arquivos textos...

o arquivo UTL_SMTP_SAMPLE.txt é o arquivo que cria a stored procedure que
envia e-mails...

o arquivo bs64demo8i_sql.txt é um arquivo que eu peguei na net para usar
autenticação encode64... se alguém tiver um melhor, pode usar ele tbém...

[]'s a todos

Marco
  ----- Original Message ----- 
  From: Adalberto Sousa Monteiro 
  To: [EMAIL PROTECTED] 
  Sent: Wednesday, March 08, 2006 5:19 PM
  Subject: Re: [oracle_br] UTL_SMTP send mail


  Boa tarde Marco,
  Por enquanto nao estou precisando, mas logo mais estarei montando um esquema 
de envio de log direto do banco oracle, sera que poderia me passar esse esquema 
?

  Obrigado
  Adalberto

    ----- Original Message ----- 
    From: Marco 
    To: [email protected] 
    Sent: Wednesday, March 08, 2006 2:13 PM
    Subject: Re: [oracle_br] UTL_SMTP send mail


    Prezadas(os)

    consegui descobrir como se usa um servidor SMTP autenticado com o UTL_SMTP

    se alguém precisar, eh soh me escrever diretamente

    []'s

    Marco
      ----- Original Message ----- 
      From: Marco 
      To: [email protected] 
      Sent: Tuesday, March 07, 2006 10:53 AM
      Subject: Re: [oracle_br] UTL_SMTP send mail


      Aproveitando a carona... alguém sabe como usar o UTL_SMTP com 
autenticação no servidor SMTP?
      Estou procurando no google, mas todos os exemplos que eu acho são para 
servidores SMTP sem autenticação

      obrigado e abraços
        ----- Original Message ----- 
        From: Lekão 
        To: [email protected] 
        Sent: Tuesday, March 07, 2006 10:17 AM
        Subject: Re: [oracle_br] UTL_SMTP send mail


        bom vamos ver se posso te ajudar ...

        crie um rotina de email ....(Procedure) e crie uma outra rotina que 
execute
        seus select's , enfim, armazene o resultado em um campo tipo CLOB(4GB) 
e ao
        final da sua rotina você chama a procedure de envio de email, no 
parâmetros
        de entrada da procedure tem que haver um campo mensagem tipo CLOB também
        para evitar algum tipo de erro, acho que se vc seguir estes 
procedimentos o
        restante é tranquilo, pois para criar uma JOB com rotinas armazenadas 
no BD
        é sossegado..boa sorte...

        Aleks
        ----- Original Message ----- 
        From: "Dj" <[EMAIL PROTECTED]>
        To: <[email protected]>
        Sent: Tuesday, January 01, 2002 10:14 PM
        Subject: Re: [oracle_br] UTL_SMTP send mail


        Como eu faço mandar um e-mail com o resultado de um select
        por exemplo "Select  *  from Clientes" e "Select count (id)  From 
clientes",
        é possivel criar uma job para executar esse procedimento todos os dias 
as
        8:00 am
        ?
          ----- Original Message ----- 
          From: desenvolvimento_cre
          To: [email protected]
          Sent: Sunday, March 05, 2006 8:46 PM
          Subject: [oracle_br] UTL_SMTP send mail


          cono eu faço mandar um e-mail com o resultado de um select
          por exemplo "Select  *  from Clientes" e "Select count (id)  From
        clientes",
          é possivel criar uma job para executar esse procedimento todos os 
dias as
          8:00 am








          
--------------------------------------------------------------------------
        ------------------------------------------------
          Atenção! As mensagens deste grupo são de acesso público e de inteira
        responsabilidade de seus remetentes.
          Acesse: http://www.mail-archive.com/[email protected]/
          
--------------------------------------------------------------------------
        
------------------------------------------------____________________________
        ______________________________________

          Este Grupo recebe o apoio da SQL Magazine -
        www.devmedia.com.br/sqlmagazine
          __________________________________________________________________



                Yahoo! Grupos, um serviço oferecido por:
                      PUBLICIDADE




        
----------------------------------------------------------------------------
        --
          Links do Yahoo! Grupos

            a.. Para visitar o site do seu grupo na web, acesse:
            http://br.groups.yahoo.com/group/oracle_br/

            b.. Para sair deste grupo, envie um e-mail para:
            [EMAIL PROTECTED]

            c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
        Serviço do Yahoo!.



        [As partes desta mensagem que não continham texto foram removidas]






        
----------------------------------------------------------------------------
        ----------------------------------------------
        Atenção! As mensagens deste grupo são de acesso público e de inteira
        responsabilidade de seus remetentes.
        Acesse: http://www.mail-archive.com/[email protected]/
        
----------------------------------------------------------------------------
        
----------------------------------------------______________________________
        ____________________________________

        Este Grupo recebe o apoio da SQL Magazine - 
www.devmedia.com.br/sqlmagazine
        __________________________________________________________________

        Links do Yahoo! Grupos









                    
        _______________________________________________________
        Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador 
agora!
        http://br.acesso.yahoo.com 


        
--------------------------------------------------------------------------------------------------------------------------
        Atenção! As mensagens deste grupo são de acesso público e de inteira 
responsabilidade de seus remetentes.
        Acesse: http://www.mail-archive.com/[email protected]/ 
        
--------------------------------------------------------------------------------------------------------------------------__________________________________________________________________

        Este Grupo recebe o apoio da SQL Magazine - 
www.devmedia.com.br/sqlmagazine 
        __________________________________________________________________



              Yahoo! Grupos, um serviço oferecido por: 
                    PUBLICIDADE
                      
             


      
------------------------------------------------------------------------------
        Links do Yahoo! Grupos

          a.. Para visitar o site do seu grupo na web, acesse:
          http://br.groups.yahoo.com/group/oracle_br/
            
          b.. Para sair deste grupo, envie um e-mail para:
          [EMAIL PROTECTED]
            
          c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do 
Serviço do Yahoo!. 



      [As partes desta mensagem que não continham texto foram removidas]





      
--------------------------------------------------------------------------------------------------------------------------
      Atenção! As mensagens deste grupo são de acesso público e de inteira 
responsabilidade de seus remetentes.
      Acesse: http://www.mail-archive.com/[email protected]/ 
      
--------------------------------------------------------------------------------------------------------------------------__________________________________________________________________

      Este Grupo recebe o apoio da SQL Magazine - 
www.devmedia.com.br/sqlmagazine 
      __________________________________________________________________



            Yahoo! Grupos, um serviço oferecido por: 
                  PUBLICIDADE
                    
           


    
------------------------------------------------------------------------------
      Links do Yahoo! Grupos

        a.. Para visitar o site do seu grupo na web, acesse:
        http://br.groups.yahoo.com/group/oracle_br/
          
        b.. Para sair deste grupo, envie um e-mail para:
        [EMAIL PROTECTED]
          
        c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do 
Serviço do Yahoo!. 



    [As partes desta mensagem que não continham texto foram removidas]





    
--------------------------------------------------------------------------------------------------------------------------
    Atenção! As mensagens deste grupo são de acesso público e de inteira 
responsabilidade de seus remetentes.
    Acesse: http://www.mail-archive.com/[email protected]/ 
    
--------------------------------------------------------------------------------------------------------------------------__________________________________________________________________

    Este Grupo recebe o apoio da SQL Magazine - www.devmedia.com.br/sqlmagazine 
    __________________________________________________________________



          Yahoo! Grupos, um serviço oferecido por: 
                PUBLICIDADE
                  
         


----------------------------------------------------------------------------
    Links do Yahoo! Grupos

      a.. Para visitar o site do seu grupo na web, acesse:
      http://br.groups.yahoo.com/group/oracle_br/
        
      b.. Para sair deste grupo, envie um e-mail para:
      [EMAIL PROTECTED]
        
      c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do 
Serviço do Yahoo!. 


  ----------

CREATE OR REPLACE PROCEDURE pservmail 
IS

  hostmail        VARCHAR2(40);
  conexao         UTL_SMTP.CONNECTION;
  mensagem        VARCHAR2(1000);
  destinatario    VARCHAR2(40);
  remetente       VARCHAR2(40);
  datetime        VARCHAR(50);

BEGIN
  remetente    := '[EMAIL PROTECTED]'; -- obrigatorio
  destinatario := '[EMAIL PROTECTED]';
  hostmail     := '200.XXX.XXX.XXX'; -- IP do servidor SMTP
  conexao      := UTL_SMTP.OPEN_CONNECTION (hostmail);
  SELECT TO_CHAR(SYSDATE, 'DD/MM/YYYY - HH24:MM') INTO datetime FROM DUAL;
  mensagem || '  DATA E HORA DA MENSAGEM '|| datetime || chr(13) || chr(10);
  UTL_SMTP.EHLO (conexao, hostmail);
  UTL_SMTP.COMMAND (conexao,'AUTH LOGIN');  
  utl_smtp.COMMAND (conexao, demo_base64.encode(utl_raw.cast_to_raw('[EMAIL 
PROTECTED]'))); -- O MESMO DO REMETENTE
  utl_smtp.command (conexao, demo_base64.encode(utl_raw.cast_to_raw('SENHA'))); 
-- SENHA
  UTL_SMTP.MAIL (conexao, remetente);
  UTL_SMTP.RCPT (conexao, destinatario);
  UTL_SMTP.DATA (conexao, mensagem);
  UTL_SMTP.QUIT      (conexao);
END;
/
  ----------

REM
REM bs64demo8i.sql - Demo PL/SQL program that encodes binary data using the
REM Base64-encoding scheme per the MIME standard (RFC 2045).
REM
REM @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
REM Note: The performance of this Base-64 encoding package is slow due to
REM excessive string parsing and byte manipulation in PL/SQL. A native
REM implemenation of this function has been provided in Oracle 9i.
REM @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@

CREATE OR REPLACE PACKAGE demo_base64 IS
   
   -- Base64-encode a piece of binary data.
   --
   -- Note that this encode function does not split the encoded text into
   -- multiple lines with no more than 76 bytes each as required by
   -- the MIME standard.
   --
   FUNCTION encode(r IN RAW) RETURN VARCHAR2;

END;
/

CREATE OR REPLACE PACKAGE BODY demo_base64 IS
   
   TYPE vc2_table IS TABLE OF VARCHAR2(1) INDEX BY BINARY_INTEGER;
   map vc2_table;
   
   -- Initialize the Base64 mapping
   PROCEDURE init_map IS
   BEGIN
      map(0) :='A'; map(1) :='B'; map(2) :='C'; map(3) :='D'; map(4) :='E';
      map(5) :='F'; map(6) :='G'; map(7) :='H'; map(8) :='I'; map(9):='J';
      map(10):='K'; map(11):='L'; map(12):='M'; map(13):='N'; map(14):='O';
      map(15):='P'; map(16):='Q'; map(17):='R'; map(18):='S'; map(19):='T';
      map(20):='U'; map(21):='V'; map(22):='W'; map(23):='X'; map(24):='Y';
      map(25):='Z'; map(26):='a'; map(27):='b'; map(28):='c'; map(29):='d';
      map(30):='e'; map(31):='f'; map(32):='g'; map(33):='h'; map(34):='i';
      map(35):='j'; map(36):='k'; map(37):='l'; map(38):='m'; map(39):='n';
      map(40):='o'; map(41):='p'; map(42):='q'; map(43):='r'; map(44):='s';
      map(45):='t'; map(46):='u'; map(47):='v'; map(48):='w'; map(49):='x';
      map(50):='y'; map(51):='z'; map(52):='0'; map(53):='1'; map(54):='2';
      map(55):='3'; map(56):='4'; map(57):='5'; map(58):='6'; map(59):='7';
      map(60):='8'; map(61):='9'; map(62):='+'; map(63):='/';
   END;
   
   FUNCTION encode(r IN RAW) RETURN VARCHAR2 IS
     i pls_integer;
     x pls_integer;
     y pls_integer;
     v VARCHAR2(32767);
   BEGIN
      
      -- For every 3 bytes, split them into 4 6-bit units and map them to
      -- the Base64 characters
      i := 1;
      WHILE ( i + 2 <= utl_raw.length(r) ) LOOP
         x := to_number(utl_raw.substr(r, i, 1), '0X') * 65536 +
              to_number(utl_raw.substr(r, i + 1, 1), '0X') * 256 +
              to_number(utl_raw.substr(r, i + 2, 1), '0X');
         y := floor(x / 262144); v := v || map(y); x := x - y * 262144;
         y := floor(x / 4096);   v := v || map(y); x := x - y * 4096;
         y := floor(x / 64);     v := v || map(y); x := x - y * 64;
                                 v := v || map(x);
         i := i + 3;
      END LOOP;

      -- Process the remaining bytes that has fewer than 3 bytes.
      IF ( utl_raw.length(r) - i = 0) THEN
         x := to_number(utl_raw.substr(r, i, 1), '0X');
         y := floor(x / 4);      v := v || map(y); x := x - y * 4;
         x := x * 16;            v := v || map(x);
         v := v || '==';
      ELSIF ( utl_raw.length(r) - i = 1) THEN
         x := to_number(utl_raw.substr(r, i, 1), '0X') * 256 +
              to_number(utl_raw.substr(r, i + 1, 1), '0X');
         y := floor(x / 1024);   v := v || map(y); x := x - y * 1024;
         y := floor(x / 16);     v := v || map(y); x := x - y * 16;
         x := x * 4;             v := v || map(x);
         v := v || '=';
      END IF;
      
      RETURN v;
   
   END;

BEGIN
   init_map;
END;
/


[As partes desta mensagem que não continham texto foram removidas]





--------------------------------------------------------------------------------------------------------------------------
Atenção! As mensagens deste grupo são de acesso público e de inteira 
responsabilidade de seus remetentes.
Acesse: http://www.mail-archive.com/[email protected]/ 
--------------------------------------------------------------------------------------------------------------------------__________________________________________________________________

Este Grupo recebe o apoio da SQL Magazine - www.devmedia.com.br/sqlmagazine 
__________________________________________________________________
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/oracle_br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 


Responder a