1
J'ai essayé d'envoyer un e-mail en utilisant TLS et le numéro de port est 587 avec le nom du serveur est smtp.gmail.com mais j'ai toujours eu l'erreur "error '8004020e'". J'ai mis SSL à faux parce que l'authentification du port 587 est TLS. Tout faux dans mon code?Envoi d'un e-mail sur TLS
Set objMail = Server.CreateObject("CDO.Message")
Set objConfig = CreateObject("CDO.Configuration")
objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com"
objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 587
objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = false
objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendusername") = "[email protected]"
objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "xx"
objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
objConfig.Fields.Update
Set objMail.Configuration = objConfig
objMail.From = "[email protected]"
objMail.To = "[email protected]"
objMail.Subject = "Test EMAIL"
objMail.TextBody = "Test EMAIL"
objMail.HTMLBody = "fffffffffff"
objMail.Send
Set objMail = Nothing
vérifier ceci: http: // stackoverflow.com/a/32788150/1682881 – SearchAndResQ
'objConfig.Fields (" http: //sc...on/smtpusessl ") = True' est requis pour TLS. –
Merci de partager votre lien, mais toujours une erreur. Je change smtpusessl comme vrai et change le port de smtp à 25. suivre exactement même dans le lien que vous me donnez. Est-il smtpusessl requis pour SSL ou STP? Selon mes connaissances, CDO ne peut pas supporter TLS? Toute solution dans vbscript? –