主题：MailSender收不到附件

Dim m As New MailSender
m.Host = "smtp.163.com"
m.Account = "******"
m.Password = "********"
m.From = "*******@163.com"
m.To = "gentium9999@126.com"
m.Title = "初稿已经完成"
m.Content  = "附件为初稿, 请您审阅!"
m.AddAttachments("c:\xx.txt")
m.SendAsync()

为什么附件不能收到呢，有遇到这种情况的吗？

可以了，顺便问一句：可以一次性添加多个附件吗？

比如：

m.Title = "商标"
m.Content  = "附件为商标要求, 请您查收!"
For Each File As String In FileSys.GetFiles("F:\public\logo\")
    m.AddAttachments(File)
Next
m.SendAsync()

然后批量删除

For Each File As String In FileSys.GetFiles("F:\public\logo\")
    FileSys.DeleteFile(File,2,2)
Next

那如何判断是否新增的文件呢？

 

希望实现：

 

监控的文件夹，一旦有新创建的文件就立即发送到某固定定邮箱

老大，俺是说附件如何设置，因为附件不确定什么格式，也不确定什么名称的

经查，邮件发送后，浏览器登陆邮箱可以收到附件，但是用客户端就收不到的，我用的是网易闪电邮，也不知道是什么原因

 

Dim p As String=filewatcher.path
Dim m As New MailSender

 

 

........

 

 

 

m.AddAttachments(p & "\" & e.name)
m.SendAsync()

大家有遇到这种情况吗，又正在使用闪电邮的能否帮忙测试一下，为什么网页登陆邮箱可以收到附件，但是用闪电邮客户端收不到呢？