https://youtu.be/uejJ7CKQlXo
Bom Dia Boa Tarde Boa Noite
Seja Membro do Canal
Esse Ao Vivo vai estrear as 10:00 do dia 25/10/2020-
DICAS 3145 -WEBDEV TUTORIAL 79 - 25-10-2020-10_00Hrs-Licao 5.3 - EMAIL - ENVIAR EMAIL CODIGO - PARTE C
ASSUNTOS
Enviando o email
Criando botao
Entrando no codigo do botao
Digitando os comandos EMAILSMTPSESSION
Explicando EMAILSMTPSESSION
Acrescentando Destinatario no popup
Digitando dados do EMAIL
Explicando Dados Email
Fechando Sessão
Proxima Licao: Melhorias na Pagina
---------------------- Indice Email
EmailOpenMail - Windev Curso Email - 1
FOR EACH email - Windev Curso Email - 2
--------------- Indice WebdevEmailOpenMail - Windev Curso Email - 1
FOR EACH email - Windev Curso Email - 2
VERIFICA EMAIL - EMAILCHECKADDRESS - EMAIL 4 - AULA 1278
EMAIL-VERIFICA-TRANSFORMEI EM PROCEDURE - EMAIL 5 - AULA 1279
AULA 1282 PROGRAMA DE EMAIL .EXE PARA COMUNIDADE EMAIL 6
DICAS 1966 - PUBLICA - WINDEV - EMAIL 7 - ENVIAR EMAIL PELO WINDEV
DICAS 3307 - WINDEV WEBDEV MOBILE - Criando Programa Email e criar componente dele para utilização - Parte 1 - Email - 13EMAIL-VERIFICA-TRANSFORMEI EM PROCEDURE - EMAIL 5 - AULA 1279
AULA 1282 PROGRAMA DE EMAIL .EXE PARA COMUNIDADE EMAIL 6
DICAS 1966 - PUBLICA - WINDEV - EMAIL 7 - ENVIAR EMAIL PELO WINDEV
DICAS 3067 -WEBDEV TUTORIAL 1-Licao 1.1-14-09-2020 11hrs-DESCUBRA WEBDEV
DICAS 3068 -WEBDEV TUTORIAL 1-Licao 1.2-14-09-2020 15hrs-Web development and WEBDEV - PARTE A
DICAS 3069 -WEBDEV TUTORIAL 3-Licao 1.2-14-09-2020 16hrs-Web development and WEBDEV - PARTE B
DICAS 3070 -WEBDEV TUTORIAL 4-Licao 1.2-14-09-2020 17hrs-Web development and WEBDEV - PARTE C
DICAS 3071 -WEBDEV TUTORIAL 5-Licao 1.3-15-09-2020 11hrs-Lesson 1.3. Minha Primeira Pagina - PARTE A
DICAS 3071 -WEBDEV TUTORIAL 5-Licao 1.3-15-09-2020 11hrs-Lesson 1.3. Minha Primeira Pagina - PARTE A
DICAS 3076 -WEBDEV TUTORIAL 10-Licao 1.3-16-09-2020 16hrs-Lesson 1.3. TESTE PAGINA E WDMAP - PARTE F
====================================
// btn_enviar ( popup)(server)
// SMTP
MINHA_SESSAO is emailSMTPSession
MINHA_SESSAO..ServerAddress="smtpserver"
MINHA_SESSAO..name="nome_usuario"
MINHA_SESSAO..Password="senha"
IF EmailStartSession(MINHA_SESSAO)=False THEN
ToastDisplay("smtp com erro",toastLong,vaMiddle,haCenter,ErrorInfo())
RETURN
END
//EMAIL
EMAIL_DADOS is Email
EMAIL_DADOS..Sender=EDT_Remetente
EMAIL_DADOS..Subject=EDT_Assunto
EMAIL_DADOS..html=EDT_HTML
EMAIL_DADOS..Message=HTMLToText(EDT_HTML)
EMAIL_DADOS..Recipient=EDT_Destinatario
// ENVIAR EMAIL
IF EmailSendMessage(MINHA_SESSAO,EMAIL_DADOS)=False THEN
ToastDisplay("ERRO MENSAGEM",ErrorInfo())
ELSE
ToastDisplay("MENSAGEM ENVIADA COM SUCESSO")
END
// FECHAR SESSAO
EmailCloseSession(MINHA_SESSAO)
====================================
PlayList WebDev tutorial Amarildo Webdev
Playlist Windev Tutorial Amarildo Windev
Playlist windev Franca PcSoft
Amarildo
Windev
WxSolucoes
Matos Informatica
Repositorio Windev
Site forum Google
Video sobre 3 Mil Videos Windev
PlayList Pedrosao
Video sobre Alfaserver servidor
Ultimo Video manipulacao arquivos
Agora vamos criar o controle de botão para enviar e-mails.
Enviando o email
- Para criar o controle de botão para enviar e-mails:
- No painel "Criação", no grupo "Controles usuais", clique em .
- Clique no local onde deseja criar o controle de botão (por exemplo, na parte inferior da página).
- Selecione o controle e modifique sua legenda (pressione Enter, por exemplo). A nova legenda é "Enviar".
- Edite o código deste controle (F2).
- Digite os seguintes códigos no evento de servidor "Click":
- o código para abrir a conexão e para iniciar a sessão SMTP:Este código usa uma variável avançada emailSMTPSession . As diferentes propriedades desta variável são usadas para definir as características da sessão SMTP. Em seguida, EmailStartSession associado a essa variável é usado para iniciar a sessão.MySession é emailSMTPSession
MySession .ServerAddress = "smtpserver"
// Digite o endereço do servidor SMTP
MySession .Name = "user_name"
// Digite o nome de usuário (se necessário)
MySession .Password = ""
// Digite a senha (se necessário)
// Inicia a sessão SMTP
IF EmailStartSession ( MySession ) = False THEN ToastDisplay ( "Não foi possível conectar ao servidor SMTP." , ... ErrorInfo ()) RETURN END - o código para preparar o e-mail:Este código usa uma variável de e - mail . As diferentes propriedades desta variável são usadas para definir as características do e-mail a enviar. Este código associa o conteúdo de diferentes controles de página às propriedades da variável Email.Sugestão é Email
sugestão .Sender = EDT_ Sender
sugestão .Subject = EDT_ Assunto
sugestão .HTML = EDT_ HTML_Text
sugestão .message = HTMLToText ( EDT_ HTML_Text )
sugestão .Recipient = "desenvolvedor @ mysite" - o código para enviar o e-mail:O email é enviado por EmailSendMessage . Basta passar como parâmetros: a variável que contém as características da sessão SMTP e a variável que contém as características do e-mail a enviar.// Envie o e-mail
IF EmailSendMessage ( MySession , Suggestion ) = False THEN ToastDisplay ( "Erro de envio" , ErrorInfo ()) ELSE ToastDisplay ( "Obrigado por sua sugestão." ) END
Se o e-mail for enviado, uma mensagem Toast será exibida, indicando que o e-mail foi enviado. Uma mensagem brinde corresponde a uma mensagem furtiva. - o código para fechar a sessão SMTP:Este código fecha a sessão com EmailCloseSession . Feche o editor de código.// Fechar a sessão SMTP
EmailCloseSession ( MySession )
- o código para abrir a conexão e para iniciar a sessão SMTP:
- Salve a página e seu código ( ou Ctrl + S).