vb.net发送和接收的电子邮件,但没有附件
我有一个页面,可以发送带有多个附件的电子邮件。以下是我通过asp:AjaxFileUpload控件(称为ajaxUpload1)上载文件的代码: 附件是由所有上传文件名组成的列表 这个bit负责在按钮点击事件中设置邮件附件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
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);
}