ms access - Send email using CDO no longer working -


since last week, no longer able send email via gmail's smtp server. error " -2147220973 transport failed connect server" whenever try send email. however, if try using network (ex. mobile broadband) works. below code sending email.

    set cdomsg = createobject("cdo.message")     set cdoconf = createobject("cdo.configuration")     cdoconf.load -1 ' cdo source defaults     set cdofields = cdoconf.fields      cdofields         .item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1         .item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "example@gmail.com"         .item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "abc"         .item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com"         .item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2         .item("http://schemas.microsoft.com/cdo/configuration/smptserverport") = 465         .item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = true         .item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout")  = 60         .update     end 

what possible problem? thank you.


Comments

Popular posts from this blog

c++11 - Intel compiler and "cannot have an in-class initializer" when using constexpr -

rest - Spring boot: Request method 'PUT' not supported -

java - WrongTypeOfReturnValue exception thrown when unit testing using mockito -