电子邮件附件未随电子邮件一起发送

Question

一直在搜索论坛，虽然有人提出并回答了这个问题，但遗憾的是，我的具体问题不在修复之列。

我在 SCADA 系统中工作，所以 System.Web.Mail。命令是我可以使用的全部。

' 是我已经尝试过的行。

这是我的邮件发送正常，但没有附件；

Dim Day as System.dateTime;
Dim sDay as String;
'Dim attachment as System.Web.Mail.MailAttachment;
'Dim attachment as string;

Day = new system.dateTime();
Day = now();
Day = system.dateTime.Parse(Day).AddDays(-1);
sDay = Day.day;

System.Web.Mail.SmtpMail.SmtpServer = "smtp.mdu.com";
System.Web.Mail.MailAttachment("G:\Test\" + me.IGCFilename + sday + ".txt");

'System.Web.Mail.MailAttachment attachment = new System.Web.Mail.MailAttachment("G:\Test\" + 
 me.IGCFilename + sday + ".txt");

System.Web.Mail.SmtpMail.Send
(
{from: } "DoNotReply@cngc.com;",
{to: } me.EmailTo,
{subject: } "Daily Gate Volumes sent to Williams",
{body: } "Gas Day Volumes"
);

me.EmailFileNow = false;

Answer 1

看起来代码正在使用 Send(String, String, String, String) 方法，该方法发送 from、to、subject、body 消息。

要添加带有附件的完整电子邮件并尝试：

Dim Day as System.dateTime;
Dim sDay as String;

Day = new system.dateTime();
Day = now();
Day = system.dateTime.Parse(Day).AddDays(-1);
sDay = Day.day;

MailAttachment att = System.Web.Mail.MailAttachment("G:\Test\" + me.IGCFilename + sday + ".txt");

emailMessage = new MailMessage();
emailMessage.From = "DoNotReply@cngc.com;";
emailMessage.To = "me.EmailTo";
emailMessage.Subject = "Daily Gate Volumes sent to Williams";
emailMessage.Body = "Gas Day Volumes";
emailMessage.Attachments.Add(att);

System.Web.Mail.SmtpMail.SmtpServer = "smtp.mdu.com";
System.Web.Mail.SmtpMail.Send(emailMessage);

me.EmailFileNow = false;

没有 vb SCADA 系统我无法测试，但上面的代码是 .net SmtpMail 代码。