Foxtable(狐表)用户栏目专家坐堂 → 关于发邮件


  共有3033人关注过本帖平板打印复制链接

主题:关于发邮件

帅哥哟,离线,有人找我吗?
newsun2k
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1483 积分:11019 威望:0 精华:0 注册:2014/8/13 16:19:00
关于发邮件  发帖心情 Post By:2014/10/13 16:46:00 [只看该作者]

帮助文件中的下列代码,测试以后,确实可以发邮件,不过每个邮件都有个红色感叹号(紧急),这个有什么办法去掉?


Dim m As New MailSender
m.Host = "smtp.21cn.net"
m.Account = "xiaoliu"
m.Password = "xiaoliu1234567"
m.From = "xiaoliu@Sina.com.cn"
m.To = "meili@Sina.com.cn"
m.Title = "
初稿已经完成"
m.Content = "
附件为初稿, 请您审阅!"
m.AddAttachments("c:\data\table.txt")
m.SendAsync()


 回到顶部