[求助]QQ发送邮件 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]QQ发送邮件

共有3366人关注过本帖树形打印复制链接主题：[求助]QQ发送邮件

薛翁

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：80 积分：836 威望：0 精华：0 注册：2015/8/29 18:22:00

[求助]QQ发送邮件 发帖心情

Post By：2020/2/7 23:24:00 [显示全部帖子]

老师您好！

我电脑上安装了QQ，对方也是QQ，我向对方传文件

请老师注释一下这段代码

'通过邮件发送

Dim m As New MailSender

m.Host = "smtp.21cn.net"

m.Account = "xiaoliu"

m.Password = "xiaoliu1234567"

m.From = "feng@32cn.net"

m.To = "zong@21cn.ent"

m.Title = "订单上报"

m.C

m.AddAttachments("c:\temp\gd.mdb") '将上报文件作为附件发送

m.SendAsync()

[此贴子已经被作者于2020/2/7 23:32:33编辑过]

薛翁

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：80 积分：836 威望：0 精华：0 注册：2015/8/29 18:22:00

Post By：2020/2/7 23:29:00 [显示全部帖子]

m.Content = "订单上报“

[此贴子已经被作者于2020/2/7 23:31:44编辑过]

主题：[求助]QQ发送邮件