Ol�...

Fa�a o seguinte.

1�  Inclua a biblioteca GCMAIL.APL

2�  No Window Variables Indentifique a Functional Class cQOEmail
     Ex.: cQOEmail: oMail

3�  If oMail.EmailIsConnected() = FALSE
        If oMail.EmailConnect( '','',' ',EMAIL_SYS_MSMAIL ) = FALSE
            Call SalMessageBox( "N�o foi poss�vel conectar com o Servidor de
Email !", "Aten��o", MB_IconStop )
            Return FALSE

4�  If NOT oMail.EmailSendMessage (FALSE, sTitulo, sMensagem, sPara, sCC,
sCCO, sFiles, 1, TRUE)
        Call oMail.EmailDisconnect()
        Return FALSE

5�  Call oMail.EmailDisconnect()

Obs.: Para que esta rotina funcione � obrigat�rio estar com o Microsoft
OutLook aberto.

Espero Ter Ajudado.
Garcia.


Ol� lista...

Alguem sabe como eu poderia mandar um e-mail pelo centura sem ter que abrir
um programa para faz�-lo.
Ou seja, programa para digitar o e-mail, assunto e msg...

Grata




==============================================
Lista de Centura SQLWindows
Administrador : [EMAIL PROTECTED]
[ http://www.centuraexplorer.com ]
Para sair desta lista mande mensagem para:
[EMAIL PROTECTED] sem nada no Subject e
com o comando a seguir no corpo da msg:
"unsubscribe sqlwin" (sem as aspas)
==============================================

Responder a