Send mail for program`s statistic
lazarus / 38-Networking and Web Programming

----------------------------------------------------------------------
Alex Cones · 2010-09-04 17:43

Hi!

I need to gather count of users of my program. I think, that good way
for that are sending mail from my program to my mailbox. I want to
have only number of users, not comp information or another crap.

But I have a little problem with that. I find a code for "secret" mail
sending, but can`t translate this code to Lazarus:
Code: [Select]program Project1;

{$APPTYPE CONSOLE}

uses IdSMTP, IdMessage;

{$R *.res}

var smtp : TIdSMTP;
    msg  : TIdMessage;

begin
  smtp := TIdSMTP.Create(nil);

  smtp.AuthenticationType := atLogin;
  smtp.Username := 'from@mail.ru';
  smtp.Password := 'ChangeMe';
  smtp.Host     := 'smtp.mail.ru';
  smtp.Port     := 25;

  smtp.Connect;

  if smtp.Authenticate then
  begin
    msg := TIdMessage.Create(nil);

    msg.Subject := 'Subject';
    msg.Body.Add('Mail body.');
    msg.From.Text := 'president@whitehouse.gov';
    msg.Recipients.EMailAddresses := 'to@yandex.ru';

    smtp.Send(msg);
    smtp.Disconnect;

    msg.Free;
  end;
  smtp.Free;
end.
Help me, please.

----------------------------------------------------------------------
typo · 2010-09-04 18:00

I think it is not a good idea.

----------------------------------------------------------------------
Alex Cones · 2010-09-04 18:02

Can you offer something better?

----------------------------------------------------------------------
typo · 2010-09-04 18:05

I'm sure you can think of something better.

----------------------------------------------------------------------
Alex Cones · 2010-09-04 18:09

I find a friend with a own server, who give me a counter page in php.
For inc counter need to send user to page with counter.

Question : How to made it? User should not know about it.

----------------------------------------------------------------------
typo · 2010-09-04 18:15

Code: [Select]uses LclIntF

OpenURL(YouPageAddressString);
QuoteUser should not know about it.

User has the right to know.

----------------------------------------------------------------------
eny · 2010-09-04 18:22

Quote from: Alex Cones on September 04, 2010, 08:09:06 pmUser should
not know about it.
There's a name for software like this: virus, spyware

----------------------------------------------------------------------
theo · 2010-09-04 18:26

Don't do this from your application.
Count the downloads on the software's homepage.

----------------------------------------------------------------------
Alex Cones · 2010-09-05 05:35

Quotevirus, spywareIt`s a panel like Cairo Dock.
QuoteCount the downloads on the software's homepage.I have a few way
for "propagating" my program. And there are opportunity, that`s a
program will be propagating by another people. I only want to now
number of users. I think It`s a not bad thing.

What about that way: ShellExec for iexplorer, in params url in
SW_HIDE. After 10-15 secs destroy it?