lalin wrote: > The error number is always 550. In IIS, it appears a connection but it > doesn't send anything.
Means 550 Relaying denied You probably need to authenticate first. Play with the demo and try to understand how it is done. --- Arno Garrels [TeamICS] http://www.overbyte.be/eng/overbyte/teamics.html > Regards. > > ----- Original Message ----- > From: "Francois PIETTE" <[EMAIL PROTECTED]> > To: "ICS support mailing" <twsocket@elists.org> > Sent: Thursday, September 07, 2006 8:07 PM > Subject: Re: [twsocket] SMTPClient > > >> 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 >>> 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 -- 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
