You should, as it is done in the demo MailSnd, display the messages from the server and also check for errors. Reading the messages and errors, you'll understand what's going wrong.
-- Contribute to the SSL Effort. Visit http://www.overbyte.be/eng/ssl.html -- [EMAIL PROTECTED] http://www.overbyte.be ----- Original Message ----- From: "lalin" <[EMAIL PROTECTED]> To: "ICS support mailing" <twsocket@elists.org> Sent: Thursday, September 07, 2006 4:46 PM Subject: Re: [twsocket] SMTPClient > Hello, > No, I hadn't seen your answer. Thanks for response once. > Now, I use the asynchronous model, when I send the mail, it executes > this code: > Smtp1.port := 'smtp'; > Smtp1.FromName := name; > Smtp1.HdrFrom := mail1; > Smtp1.HdrTo := destino; > Smtp1.RcptName.add(destino); > Smtp1.RcptName.add(mail2); > Smtp1.HdrSubject := titulo; > Smtp1.MailMessage := mensaje; > if (not Smtp1.connected) then begin > Smtp1.Connect; > end; > > I have created a OnRequestDone method: > Display('RequestDone Rq=' + IntToStr(Ord(RqType))); > case RqType of > smtpConnect: begin > Smtp1.Helo; > Display('Helo!'); > end; > smtpHelo: begin > Smtp1.MailFrom; > Display('Mailfrom!'); > end; > smtpMailFrom: begin > Smtp1.RcptTo; > Display('RcptTo!'); > end; > smtpRcptTo: begin > Smtp1.Data; > Display('Data!'); > end; > smtpData: begin > Smtp1.Quit; > Display('Quit!'); > end; > smtpQuit: > Display('Done!'); > end; > > The result is: > > RequestDone Rq=0 > Helo! > RequestDone Rq=1 > Mailfrom! > RequestDone Rq=2 > RcptTo! > RequestDone Rq=4 > Data! > RequestDone Rq=5 > Quit! > RequestDone Rq=6 > Done! > > But the mail isn't received. I have tested the smtp server 127.0.0.1 > and > the domain in IIS console. > What can it be? > > Regards. > > ----- Original Message ----- > From: "Francois PIETTE" <[EMAIL PROTECTED]> > To: "ICS support mailing" <twsocket@elists.org> > Sent: Wednesday, September 06, 2006 6:08 PM > Subject: Re: [twsocket] SMTPClient > > >> You already asked your question one week ago. Did you see my answer ? >> >> Here it is again: >> > > > produces "SMTP component not ready". Can you help me? >> >> As another message already said, you are trying to use an asynchronous >> (non-blocking) component as a synchronous component. Either revise you >> way >> of doing thing or use the "sync" version of the component. >> >> It is better to revise your programming model and use the asynchronous >> model. That is use the events. Look at MailSnd sample program delivered > with >> ICS. Look at the code behind "All In One" button which show how to use >> the >> events to chain all operations required to send emails. >> >> Once you had a look at the sample, don't hesitate to ask for more > questions. >> >> -- >> Contribute to the SSL Effort. Visit http://www.overbyte.be/eng/ssl.html >> -- >> [EMAIL PROTECTED] >> http://www.overbyte.be >> >> >> ----- Original Message ----- >> From: "lalin" <[EMAIL PROTECTED]> >> To: "ICS support mailing" <twsocket@elists.org> >> Sent: Wednesday, September 06, 2006 4:50 PM >> Subject: [twsocket] SMTPClient >> >> >> > Hello, >> > I use SMTPClient for sending a email since a server with default > smtp >> > server of IIS. The example program find this smtp server. But in my >> > program, >> > with this code: >> > Smtp1.Host := smtpserver; >> > Smtp1.port := 'smtp'; >> > Smtp1.FromName := name; >> > Smtp1.HdrFrom := mail1; >> > Smtp1.HdrTo := mail2; >> > Smtp1.HdrSubject := title; >> > Smtp1.Connect; >> > Smtp1.Data; >> > Smtp1.quit; >> > >> > produces "SMTP component not ready". >> > The first time that execute it, it connects but it fails in Data. >> > The second time, it passes Connect and Data and it fails in Quit but > I >> > don't receive mail. >> > I have tested with server 127.0.0.1 or localhost and it is the same. >> > >> > Can you help me? >> > >> > Regards. >> > Carlos. >> > >> > >> > -- >> > To unsubscribe or change your settings for TWSocket mailing list >> > please goto http://www.elists.org/mailman/listinfo/twsocket >> > Visit our website at http://www.overbyte.be >> >> -- >> To unsubscribe or change your settings for TWSocket mailing list >> please goto http://www.elists.org/mailman/listinfo/twsocket >> Visit our website at http://www.overbyte.be >> > > > -- > To unsubscribe or change your settings for TWSocket mailing list > please goto http://www.elists.org/mailman/listinfo/twsocket > Visit our website at http://www.overbyte.be -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
