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)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to