Francesco

Actually I use HB_Sendmail from svn and works ok

Bruno Luciani

2009/11/20 francesco perillo <[email protected]>

> Is anybody using hb_sendmail() ? I already said that it is not fully
> smtp protocol compliant.... and my tests (trunk compiled with bcc)
> didn't worked at all due to this incoorect protocol implementation....
>
> So, if you are using this patch and it works ok for you, please tell me !
>
> If it works for you or doesn't, please test this patch in
> contrib\hbtip and report.
>
> Thanks,
> Francesco
>
>
> Index: smtpcli.prg
> ===================================================================
> --- smtpcli.prg (revision 12954)
> +++ smtpcli.prg (working copy)
> @@ -96,10 +97,11 @@
>       bTrace := {| cMsg | iif( PCount() > 0, oLog:Add( cMsg ), oLog:Close()
> ) }
>    ENDIF
>
>    ::super:New( oUrl, bTrace, oCredentials )
>
>    ::nDefaultPort := iif( ::oUrl:cProto == "smtps", 465, 25 )
> -   ::nConnTimeout := 5000
> +   ::nConnTimeout := 50000
>    ::nAccessMode := TIP_WO  // a write only
>
>    RETURN Self
> @@ -110,6 +112,10 @@
>       RETURN .F.
>    ENDIF
>
> +   IF ! ::GetOk()
> +      RETURN .F.
> +   ENDIF
> +
>    DEFAULT lTLS TO .F.
>
>    IF lTLS
> @@ -129,6 +135,10 @@
>       RETURN .F.
>    ENDIF
>
> +   IF ! ::GetOk()
> +      RETURN .F.
> +   ENDIF
> +
>    DEFAULT lTLS TO .F.
>
>    IF lTLS
> _______________________________________________
> Harbour mailing list (attachment size limit: 40KB)
> [email protected]
> http://lists.harbour-project.org/mailman/listinfo/harbour
>
_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to