Discussion :

[Nillak]

Bonjour,
je travaille avec un CGI stand-alone pour envoyer des emails en tuilisant Indy 10. Il se produit un problème de façon irrégulière, quand le programme tente d'enoyer un email:
An exception has occurred : EInvalidOp=Invalid floating point operation

Si cette exception se produit, elle est attrapée et j'essaye alors de déconnecter le smtp, avant de le libérer. Il semblerait que le smtp ne peut pas se déconnecter. La seul façon de faire, mis à part de tuer le processus, c'est d'attendre le timeout d'execution du CGI. Je travaille avec postfix.
voici le code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
 try
          FMailMessage := TIdMessage.Create;
          FMailMessage.From.Text := aFrom;
          FMailMessage.Sender.Text := aFrom;
          FMailMessage.Recipients.EMailAddresses := aTo;
          FMailMessage.Subject := aSubject;
          anEmail.MailMessage.Body.Text := aBodyText
          try
            FSMTP := TIdSMTP.Create(nil);
            FSMTP.Host := aHost;
            FSMTP.Port := aPort;
            FSMTP.Connect;
            FSMTP.Send(FMailMessage);
          except
            on E:Exception do
            begin
              if FSMTP.Connected then
                FSMTP.Disconnect;
              FSMTP.Free;
            end;
          end;
        finally
          if Assigned(FSMTP) then
          begin
            if FSMTP.Connected then
              FSMTP.Disconnect;
            FSMTP.Free;
          end;
        end;

Merci pour votre aide

[Nillak]

je précise ,le programme cgi est compilé avec Kylix.
J'avoue sécher sur le problème. Est-ce un problème de configuraion du serveur smtp ? Cependant la fonction mail de php fonctionne parfaitement et nous n'avons jamais eu de problème avec son utilisation. Je regarde du coté de Lazarus, pfff que de code à réécrire.
Bref, toute aide sera la bien venue

[Rayek]

Je pense qu'il faille que tu renseignes le Username et password pour l'authentification du composant SMTP.

[Nillak]

Bonjour Rayek et merci pour ta réponse,
je vais évidemment tester ça tout de suite, mais pourquoi l'envoie de mail fonctionne de temps en temps ? c'est ce point qui me gène...
je teste immédiatement et reviens faire un tour par ici

[Nillak]

avec ou sans username/password, l'envoie d'email fonctionne ou pas. Mon serveur smtp n'est donc pas configuré pour recevoir un username/password. j'utilise postfix
Bizarre très bizarre

[Rayek]

Essaie en rajoutant cette ligne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
FSMTP.AuthType := atDefault;

Sinon, il faudrait voir à faire un pas à pas pour trouver le problème (si possible) ou que tu génères des logs pour faire un suivit afin de voir si vraiment le problème vient du SMTP (Je l'utilise souvent et je n'ai jamais rencontré ce problème)

[Nillak]

Effectivement je génère les logs, donc je peux suivre le déroulement, mais je ne peux pas faire de pas à pas.

Je voulais essayé ce que tu m'as proposé mais atDefault n'est pas reconnu ...
je vais chercher du coté de google ...

[Nillak]

j'ai trouvé dans le code satDefault
est-ce que cela te parle ?, je vais essayé biensur.
Au passage j'ai vu que tu etais déjà intervenu sur ce type de sujet ici, je le met au cas où certains passerais par là

[Nillak]

rien n'y fait .... vraiment étrange