-
March 21st, 2018, 04:45 AM
#1
CC not working in SMTP code
Hello
I have the following SMTP code. The code works apart from the CC. The person copied in (me@myEmail.com) does not receive any message at all. When I click on 'Start Debugging' in VS 2013, I do not get any error message. How can I correct this, please?
Code:
Protected Sub SendEmail_Click(sender As Object, e As System.EventArgs)
Dim myMessage As New MailMessage
Dim Smtpserver As New SmtpClient
Try
Dim user_name As String = Request.Form("user_name")
Dim user_email As String = Request.Form("user_email")
Dim user_subject As String = Request.Form("user_subject")
Dim user_message As String = Request.Form("user_message")
Dim CC As MailAddress = New MailAddress("me@myEmail.com")
myMessage.From = New MailAddress(user_email) 'User's email
myMessage.To.Add(New MailAddress("info@mysite.net")) 'Webmaster
myMessage.CC.Add(New MailAddress("me@myEmail.com")) 'Webmaster's assistant
myMessage.Subject = user_subject
myMessage.Body = user_message
myMessage.DeliveryNotificationOptions = DeliveryNotificationOptions.OnFailure
myMessage.IsBodyHtml = True
myMessage.Priority = MailPriority.Normal
Smtpserver.DeliveryMethod = SmtpDeliveryMethod.Network
Smtpserver.Host = ("mail.server")
Smtpserver.Port = 25
Smtpserver.EnableSsl = False
Dim basicAuthenticationInfo As New System.Net.NetworkCredential("info@mysite.net", "Password")
Smtpserver.Credentials = basicAuthenticationInfo
'Smtpserver.UseDefaultCredentials = False
Smtpserver.Send(myMessage)
myMessage.Dispose()
myMessage = Nothing
Smtpserver = Nothing
Catch ex As Exception
ex.ToString()
End Try
End Sub
Many thanks!
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|