Ir para conteúdo
Faça parte da equipe! (2024) ×
Conheça nossa Beta Zone! Novas áreas a caminho! ×
  • Quem está por aqui   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.

Dúvida - Sistema de Cadastro..


SarahStonehenge
 Compartilhar

Posts Recomendados

Olá, assim, estou criando um sistema de cadastro pelo Delphi, consegui colocar os Edit, os Buttons, fazer o campo "Senha" aparecer com os **** só que qual é o código que vai no botão Enviar?

 

Tipo, a pessoa preenche o campo

e-mail

senha

 

e clica em ENVIAR

como faço para que quando clicarem em ENVIAR o que foi escrito vá para meu e-mail?

postpunido.png

Link para o comentário
Compartilhar em outros sites

DE 2 CLICK NO BUTAO E BOTE ESSE CODIGO

IdSMTP1.AuthenticationType := atLogin;

 

idSMTP1.Host := 'smtp.mail.yahoo.com.br' ;

 

idSMTP1.Port := 25;

 

idSMTP1.Username := '[email protected]';

 

idSMTP1.Password := 'SuaSenha';

 

idSMTP1.Connect(30000);

 

IdMessage1.From.Address := '[email protected]';

 

IdMessage1.Sender.Name := '[email protected]';

 

IdMessage1.Sender.Address := '[email protected]';

 

IdMessage1.Recipients.EMailAddresses := '[email protected]';

 

IdMessage1.Subject := edit1.Text + '''' + edit2.Text;

 

IdSMTP1.Send(IdMessage1);

 

IdSMTP1.Disconnect;

 

ALTERE OS CAMPO PARA O SEU EMAIL DESEJADO LEMBRANDO TEM QUE SER YAHOO PORQUE ESTA COMFIGURADO COM SERVE YAHOO

NAO SE ESQUEÇA

Va na aba indy clients e idSMTP BOTE NO SEU FORM

-Agora va na aba indy misc, e clike no idmessage BOTE NE SUA FORM TBM

 

COMPILIE SEU PROJETO ESCREVA NAS EDIT E ENVIEW OLHE NE SEU EMAIL

 

SO LEMBRANDO ALTERE OS DADO AONDE TEM "SEU [email protected]"

AONDE TEM SUA SENHA E PRA VOÇE BOTA SUA SENHA DO EMAIL. YAHOO

 

SE FUNCIONOU AGRADESCE AKI

Link para o comentário
Compartilhar em outros sites

DE 2 CLICK NO BUTAO E BOTE ESSE CODIGO

IdSMTP1.AuthenticationType := atLogin;

 

idSMTP1.Host := 'smtp.mail.yahoo.com.br' ;

 

idSMTP1.Port := 25;

 

idSMTP1.Username := '[email protected]';

 

idSMTP1.Password := 'SuaSenha';

 

idSMTP1.Connect(30000);

 

IdMessage1.From.Address := '[email protected]';

 

IdMessage1.Sender.Name := '[email protected]';

 

IdMessage1.Sender.Address := '[email protected]';

 

IdMessage1.Recipients.EMailAddresses := '[email protected]';

 

IdMessage1.Subject := edit1.Text + '''' + edit2.Text;

 

IdSMTP1.Send(IdMessage1);

 

IdSMTP1.Disconnect;

 

ALTERE OS CAMPO PARA O SEU EMAIL DESEJADO LEMBRANDO TEM QUE SER YAHOO PORQUE ESTA COMFIGURADO COM SERVE YAHOO

NAO SE ESQUEÇA

Va na aba indy clients e idSMTP BOTE NO SEU FORM

-Agora va na aba indy misc, e clike no idmessage BOTE NE SUA FORM TBM

 

COMPILIE SEU PROJETO ESCREVA NAS EDIT E ENVIEW OLHE NE SEU EMAIL

 

SO LEMBRANDO ALTERE OS DADO AONDE TEM "SEU [email protected]"

AONDE TEM SUA SENHA E PRA VOÇE BOTA SUA SENHA DO EMAIL. YAHOO

 

SE FUNCIONOU AGRADESCE AKI

 

Não dá, os e-mails nunca chegam.

Link para o comentário
Compartilhar em outros sites

Este tópico está impedido de receber novos posts.
 Compartilhar

×
×
  • Criar Novo...

Informação Importante

Nós fazemos uso de cookies no seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies , caso contrário, vamos supor que você está bem para continuar.