以下のコードを使用して電子メールを生成しています。開発中はローカルで問題なく動作しますが、Web 上で試してみると動作しませんか? 何か別のことをする必要がありますか、それともこの方法を使用して Web 上でこれを達成できないでしょうか?
Try
Dim mailMessage As MailMessage = New MailMessage
mailMessage.From = New MailAddress("Test@whatever.com")
'mailMessage.Subject = txtSubject.Text.Trim
'mailMessage.Body = txtBody.Text.Trim
mailMessage.IsBodyHtml = True
mailMessage.To.Add(New MailAddress("Test@whatever.com"))
' Dim files As List(Of HttpPostedFile) = CType(Session("Files"), List(Of HttpPostedFile))
'For Each file As HttpPostedFile In files
mailMessage.Attachments.Add(New Attachment("\\Server\test.pdf"))
'Next
Dim smtp As SmtpClient = New SmtpClient
smtp.Host = "Mail.com"
'smtp.EnableSsl = True
Dim NetworkCred As System.Net.NetworkCredential = New System.Net.NetworkCredential
smtp.UseDefaultCredentials = True
smtp.Send(mailMessage)
Catch ex As Exception
End Try