求助一个的邮件发送界面，使用后台语言，包含发件地址、收件地址、邮件主题、邮件内容、附件。
邮件内容转换为html格式，邮件内容大小<=5000个字符，附件大小<=500Mb。
如果能够用，人民币酬谢。发到：2653043392@ 邮箱中

[此贴子已经被作者于2018-1-2 14:17编辑过]

难得版主会有问题当然要帮一下...钱就算了~
只是不太明了版主所谓的邮件发送介面是什么意思?网页的话不知道版主要什么样式的?有没有样板?

我的方式是收件者是捞取自数据库~主旨和内容都是看页面来源(看谁呼叫的~也是捞取自数据库)~
前段VB先将资料收齐~最后再呼叫一个公用VB函式将信件寄出~

谢谢 wube 的回复
其实界面我已经搞好了，有主题、收件人地址、发件人地址、邮件内容、附件等。
其他没有问题，就是在点击发送按钮后，发送不出去，提示错误，错误就在发送邮件那个语句中，非常困惑！

Imports Microsoft.VisualBasic
Public Class AAA
    Inherits System.Web.UI.Page
    Public Shared Sub SendEmail(.....)
        Dim strSMTP = ConfigurationManager.AppSettings("MailServer").ToString    'Define : SMTP Server Name
        Dim myMail As MailMessage
        Dim mySMTP As SmtpClient

        myMail = New MailMessage()
        mySMTP = New SmtpClient()

        ......

        try
            myMail.Priority = MailPriority.Normal
            myMail.Subject = strEmailSubject
            myMail.IsBodyHtml = True
            myMail.Body = strEmailBody & strEmailSig
            mySMTP.Host = strSMTP
            mySMTP.Send(myMail)
        catch ex As Exception
            'XXXX
        Finally
            myMail.Dispose()
            If Not mySMTP.Host = "" Then
                mySMTP.Dispose()
            End If
        End Try
    End Sub
End Class