Hello,
I saw similar problem with thttpcli and it went away when I "cleaned
and rebuilt" the ICS package.
Best Regards,
SZ
On 5/17/09, Ole Braad-Sørensen <o...@soholm.com> wrote:
> On Thu, 14 May 2009 10:31:53 +0000, you wrote:
>
> >>
> >>> Possibly you need breaks? :-)
> >>>
> >>> switch(RqType)
> >>> {
> >>> case smtpConnect: SMTP->Helo(); break;
> >>> case smtpHelo: SMTP->MailFrom(); break;
> >>> case smtpEhlo: SMTP->Auth(); break;
> >>> case smtpAuth: SMTP->MailFrom(); break;
> >>> case smtpMailFrom: SMTP->RcptTo(); break;
> >>> case smtpRcptTo: SMTP->Data(); break;
> >>> case smtpData: SMTP->Quit(); break;
> >>> }
> >>
> >> No. Tried this too.
> >
> >Really?
>
> Yes, really :-)
>
> >
> >So please try again, it works fine with the breaks!
> >
>
> Maybe I did not explain myself thorough enouch, sorry!
>
> The breaks has no effect in this case, as the error comes long before the
> breaks
> will be at any use. Much code hes been made and you have not seen it all :-)
>
> Made another try on another small project with the same result. See here:
>
> First the "MailSendButton":
>
> void __fastcall TForm2::ButtonClick(TObject *Sender)
> {
> SMTP->Host = EditHost->Text;
> SMTP->Port = EditPort->Text;
> SMTP->SignOn = EditSignOn->Text;
> SMTP->FromName = EditFromName->Text;
> SMTP->HdrFrom = EditFromName->Text;
> SMTP->HdrTo = EditHdrTo->Text;
> SMTP->HdrCc = EditHdrCc->Text;
> SMTP->HdrSubject = EditHdrSubject->Text;
> SMTP->Username = EditUserName->Text;
> SMTP->Password = EditPassword->Text;
> SMTP->RcptName->Clear();
> SMTP->RcptNameAdd(EditHdrTo->Text, EditHdrCc->Text, EditHdrBcc->Text);
> Display("Connecting to mailserver");
> SMTP->Connect();
> }
>
> And now the OnRequestdone: (with breaks) :-)
>
> void __fastcall TForm2::SMTPRequestDone(TObject *Sender, TSmtpRequest RqType,
> WORD ErrorCode)
>
> {
>
> > // When arriving to here from "Connect",
> > // the RqType is = 0 and the ErrorCode is = 23396 - :-(
> > // What is ErrorCode 23396 ? (Guess it is not known)
>
> if (ErrorCode > 0 && ErrorCode < 10000) {
> Display("RequestDone Rq=" + IntToStr(RqType) + " Error=" +
> SMTP->ErrorMessage);
> } else {
> Display("RequestDone Rq=" + IntToStr(RqType) + " Error=" +
> IntToStr(ErrorCode));
> }
>
> if (ErrorCode == 0) {
> switch(RqType)
> {
> case smtpConnect: SMTP->Helo(); break;
> case smtpHelo: SMTP->MailFrom(); break;
> case smtpEhlo: SMTP->Auth(); break;
> case smtpAuth: SMTP->MailFrom(); break;
> case smtpMailFrom: SMTP->RcptTo(); break;
> case smtpRcptTo: SMTP->Data(); break;
> case smtpData: SMTP->Quit(); break;
> case smtpQuit: break;
> }
> }
> }
>
> As you see in the comments above, the switch is never reached :-(
>
> The above program is a copy of the MailSnd example, which is in Delphi and
> works
> great here. But in my "translation" to C++ it do not work. I may have missed
> something or the SMTP thing don't work at all in C++.
>
> Any suggestions...?
>
> Regards:
> Ole Braad-Sorensen
> www.importshop.dk
--
To unsubscribe or change your settings for TWSocket mailing list
please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be
