enviando e-mail com forms6i

[clebercas]

Olá amigos,
Estou utilizando a rotina abaixo para enviar e-mail e estyou com dois problemas:
o primeiro é que preciso informar um nome FIXO para o e-mail que esta enviando (FROM), especifico mas sempre vai o e-mail de quem esta enviando E NÃO POSSO DEIXAR ISTO, PRECISO ESPECIFICAR.
Segundo é que recebo uma mensagem para confirmar o envio, envio mais de setenta e-mail de uma só vez, já pensou ter que confirmar todos ..

Selecionar tudo

 objOutlook := OLE2.CREATE_OBJ('Outlook.Application');

  objarg     := OLE2.CREATE_ARGLIST;
  OLE2.ADD_ARG(objarg,0);
  objMail    := OLE2.INVOKE_OBJ(objOutlook,'CreateItem',objarg);
  OLE2.DESTROY_ARGLIST(objarg);

  OLE2.SET_PROPERTY(objmail,'To',p_para);
  OLE2.SET_PROPERTY(objmail,'Cc',p_cc);
  OLE2.SET_PROPERTY(objmail,'From',p_from); 
  OLE2.SET_PROPERTY(objmail,'Subject',p_assunto);
  OLE2.SET_PROPERTY(objmail,'Body',p_mensagem);

  OLE2.INVOKE(objmail,'Send');
  --OLE2.INVOKE(objmail,'Display');
  OLE2.RELEASE_OBJ(objmail);
  OLE2.RELEASE_OBJ(objOutlook);

[dr_gori]

Aqui nós usamos a seguinte técnica:
* Temos um shell no unix que envia emails. (usando mailx, ou mail)
* Temos uma PRC no banco que chama esse shell passando os parâmetros.

Dessa forma, podemos enviar emails de qualquer programa, seja no banco (procedures/packages) ou no forms.

Dessa forma usando OLE eu nunca usei.

[clebercas]

Thomas,
Nós estavamos utilizando uma procedure com SMTP mas estamos com algum problema no gerenciador que impede a utilização dos procedimentos, dai lembrei deste recurso e passei a usa-lo. você poderia enviar um exemplo da rotina que você utiliza pra eu testar aqui ?Eu estava uqui ?

Cleber Souza