Unlock a world of possibilities! Login now and discover the exclusive benefits awaiting you.
Hi All,
Can any one pls suggest any idea for the below error
Error : The server rejected the sender address. The server response was: 530 5.7.0 Must issue a STARTTLS command first. x10-v6sm2314716qts.27 - gsmtp
Sub SendGMail()
Set objMsg = CreateObject("CDO.Message")
Set msgConf = CreateObject("CDO.Configuration")
'Server Configuration
msgConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
msgConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusetssl") = true
msgConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/StartTSL") = true
msgConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com"
msgConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 587
msgConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
msgConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "**********@gmail.com"
msgConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "**************"
msgConf.Fields.Update
'End With
objMsg.To = "******@gmail.com" ' type to mail id
objMsg.From = "********@gmail.com" 'type from mail id
objMsg.Subject = "Test mail"
objMsg.HTMLBody = "QlikView Test Mail"
objMsg.Sender = "Mr. Name"
Set objMsg.Configuration = msgConf
' Send
objMsg.Send
Msgbox("Email Sent Successfully")
' Clear
Set objMsg = nothing
Set msgConf = nothing
End Sub
Thanks in advance
You keep opening threads about the same issue. You must talk to your Google Account Administrator to let you connect via external programs (i.e.: not using the browser or native Google apps).
Google SMTP server will reject any request if you are not properly authorized and this is not an issue in QlikView.
did you try using Port 465 instead of 587?