開発環境はVisual studio 2015でGmailを利用してメールの送信を行おうとしています。
使用するのは制限付き Gmail SMTP サーバーを利用したい状況です。
G suiteのヘルプでは下記情報でメールの送信は行えるようでした。
SMTP サービスの完全修飾ドメイン名
aspmx.l.google.com
ポート 25
TLS は不要
動的 IP を許可
メールの送信先は、Gmail または G Suite ユーザーのみに制限されます
実際に別のソフト(ベリタス、zabix等)からはメールが送れることを確認しています。
本題として当方で作成しているプログラムから上記設定を利用してメールを送信しようとしていますが、メールが一向に届かない状況です。
Gmailを使用せずにログイン認証のある別のメールサーバーを利用した際には送信できました。
下記メール送信時のソースになります。
Dim objMailSc As New Net.Mail.SmtpClient() Dim objEncodeJis As System.Text.Encoding = System.Text.Encoding.GetEncoding("iso-2022-jp") Dim objAltView As Net.Mail.AlternateView Dim objAttachment As Net.Mail.Attachment 'SMTPサーバーを指定する objMailSc.Host = "aspmx.l.google.com" 'SMTPサーバ名 objMailSc.Port = 25 'ポート番号
’認証IDパスが無いのでコメント
'objMailSc.Credentials = New System.Net.NetworkCredential("username", "password")
objMailSc.DeliveryMethod = System.Net.Mail.SmtpDeliveryMethod.Network objMailSc.EnableSsl = False objMailSc.UseDefaultCredentials = False objMailSc.Timeout = 100000
Dim mstrMail As String = "xxxxxxxx@Gmail.com"
Dim MstrSashidasi As String = "xxxxxxx"
Dim MstrSendMail As String = "xxxxxxxxxxxxxxx@xxxxxxxxx.xxxxx.jp"
'送信者設定(自社のメールアドレス、差出人) objMailMsg.From = New Net.Mail.MailAddress(mstrMail, F_EditEncode(MstrSashidasi, objEncodeJis)) '受信者設定(送信先のメールアドレス) objMailMsg.To.Add(New Net.Mail.MailAddress(MstrSendMail)) '件名 objMailMsg.Subject = F_EditEncode("バックアップエラー", objEncodeJis)
'本文
strBody = "データのバックアップ時にエラーが発生しました。"
objAltView = System.Net.Mail.AlternateView.CreateAlternateViewFromString(strBody, objEncodeJis, System.Net.Mime.MediaTypeNames.Text.Plain) objAltView.TransferEncoding = System.Net.Mime.TransferEncoding.SevenBit objMailMsg.AlternateViews.Add(objAltView) 'メール送信 objMailSc.Send(objMailMsg) objAttachment.Dispose()
あなたの回答
tips
プレビュー