vb.net发送和接收的电子邮件,但没有附件

vb.net发送和接收的电子邮件,但没有附件,vb.net,email,attachment,email-attachments,Vb.net,Email,Attachment,Email Attachments,我有一个页面,可以发送带有多个附件的电子邮件。以下是我通过asp:AjaxFileUpload控件(称为ajaxUpload1)上载文件的代码: 附件是由所有上传文件名组成的列表 这个bit负责在按钮点击事件中设置邮件附件 Try If ajaxUpload1.HasAttributes Then For counter As Integer = 0 To attahchemnts.Count ma

我有一个页面,可以发送带有多个附件的电子邮件。以下是我通过asp:AjaxFileUpload控件(称为ajaxUpload1)上载文件的代码:

附件是由所有上传文件名组成的列表

这个bit负责在按钮点击事件中设置邮件附件

Try
            If ajaxUpload1.HasAttributes Then

                For counter As Integer = 0 To attahchemnts.Count
                    mail.Attachments.Add(attahchemnts.Item(counter))

                Next

            End If
        Catch ex As Exception
            Label2.Text = ex.ToString
        End Try

问题是我能够成功地发送和接收电子邮件,但我看不到电子邮件附件。有人有线索吗?谢谢

这是我如何成功做到这一点的C版本

 var m = new MailMessage { Subject = txtSubject.Text, IsBodyHtml = true, Body = emailOpeningLine + txtMessage.Text };

            try
            {
                m.To.Add(new MailAddress(dr[0].ToString().Trim()));
                m.From = new MailAddress(txtUserName.Text);
                foreach (var attachment in Attactments)
                {
                    m.Attachments.Add(new Attachment(attachment));
                }
                client.Send(m);
                m.To.Clear();
                m.Attachments.Clear();
                Success.Add(dr[0].ToString());
            }
            catch (SmtpException esException)
            {
                Errors.Add("Error sending to " + dr[0].ToString() + " " + esException.Message);
            }
            catch (Exception ex)
            {
                Errors.Add("Error sending to " + dr[0].ToString() + " " + ex.Message);

            }
在本例中,我有一个字符串列表,其中包含要循环添加到邮件消息的附件的位置

我也有一个成功和失败的列表,这样它会在失败时继续,然后我会发现任何错误

您应该能够使用telerik代码转换器转换此代码

 var m = new MailMessage { Subject = txtSubject.Text, IsBodyHtml = true, Body = emailOpeningLine + txtMessage.Text };

            try
            {
                m.To.Add(new MailAddress(dr[0].ToString().Trim()));
                m.From = new MailAddress(txtUserName.Text);
                foreach (var attachment in Attactments)
                {
                    m.Attachments.Add(new Attachment(attachment));
                }
                client.Send(m);
                m.To.Clear();
                m.Attachments.Clear();
                Success.Add(dr[0].ToString());
            }
            catch (SmtpException esException)
            {
                Errors.Add("Error sending to " + dr[0].ToString() + " " + esException.Message);
            }
            catch (Exception ex)
            {
                Errors.Add("Error sending to " + dr[0].ToString() + " " + ex.Message);

            }