Foxtable(狐表)用户栏目专家坐堂 → 邮件能不能做到 foxmail outlook 哪里设置抄送人


  共有6024人关注过本帖树形打印复制链接

主题:邮件能不能做到 foxmail outlook 哪里设置抄送人

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


加好友 发短信
等级:六尾狐 帖子:1368 积分:12189 威望:0 精华:0 注册:2012/3/5 11:32:00
邮件能不能做到 foxmail outlook 哪里设置抄送人  发帖心情 Post By:2015/9/16 12:30:00 [显示全部帖子]

如题, 在帮助中没找到,求指导

 回到顶部
帅哥哟,离线,有人找我吗?
ljh29206
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1368 积分:12189 威望:0 精华:0 注册:2012/3/5 11:32:00
  发帖心情 Post By:2015/9/16 14:51:00 [显示全部帖子]

老师 看了

 

是不是说 狐表自带的 没有 CC 的 方法?

 

另外 我看了你发的内容

 

用 mailto 需要用到 outlook

Dim Proc As New Process

Proc.File = "mailto:" & Receiver & "?cc=" & Cc & "&bcc=" & Bcc & "&subject=" & Subject & "&body=" & Body

Proc.Start()

 

有没 能够直接一次性的方法?


 回到顶部
帅哥哟,离线,有人找我吗?
ljh29206
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1368 积分:12189 威望:0 精华:0 注册:2012/3/5 11:32:00
  发帖心情 Post By:2015/9/16 15:13:00 [显示全部帖子]

老师 ,你的方法测试过要先设置好 outlook 才行哦  我们有些电脑都没设置 。

 

下边的代码 我在论坛里面找到的,测试过可行

 

但不懂怎么设置,添加收件人的邮箱地址。能指导下么

 

 

Dim client As New System.Net.Mail.SmtpClient()
client.Host = "smtp.126.com"
client.Credentials = New System.Net.NetworkCredential("lin_hailun@126.com", "6849338.")
client.DeliveryMethod = System.Net.Mail.SmtpDeliveryMethod.Network
Dim message As New System.Net.Mail.MailMessage("lin_hailun@126.com", "2450314695@qq.com")
message.Subject = "邮件测试"
message.BodyEncoding = System.Text.Encoding.UTF8

'message.Bcc.Add("2450314695@qq.com") '密送

'message.cc.Add("2450314695@qq.com") '抄送

Dim content As String

content &= "这是文字" & vbcrlf
content &= "也是文字"

message.Body = content

Try
    client.Send(message)
    msgbox("发送成功")
Catch ex As Exception
    msgbox("发送失败:" & ex.message)
End Try



 回到顶部
帅哥哟,离线,有人找我吗?
ljh29206
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1368 积分:12189 威望:0 精华:0 注册:2012/3/5 11:32:00
  发帖心情 Post By:2015/9/16 15:41:00 [显示全部帖子]

初次设定 这样

 

  后边追加 邮箱 有没有简洁一点的写法吗 老师?

 

我要用循环来添加 邮箱

 

不能每次都 重新定义

[此贴子已经被作者于2015/9/16 15:41:41编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
ljh29206
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1368 积分:12189 威望:0 精华:0 注册:2012/3/5 11:32:00
  发帖心情 Post By:2015/9/16 17:09:00 [显示全部帖子]

额 。这样啊。。。。。 好像有点不人性化! 比 狐表更坏。。

 

我发会议请求 都是先发给 一堆人,  抄送给老大,

 

这样做不好操作...

 

老师有没点好的东西能适合用的哇

[此贴子已经被作者于2015/9/16 17:09:38编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
ljh29206
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1368 积分:12189 威望:0 精华:0 注册:2012/3/5 11:32:00
  发帖心情 Post By:2015/9/17 9:25:00 [显示全部帖子]

好的 ,太谢谢了!!

 

老师 在哪里找到 这个东西的说明的 能贴一下么

[此贴子已经被作者于2015/9/17 9:25:44编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
ljh29206
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1368 积分:12189 威望:0 精华:0 注册:2012/3/5 11:32:00
  发帖心情 Post By:2015/10/10 10:31:00 [显示全部帖子]

老师问下

 

在foxmail 里面 收件人一栏 可以显示人名

 

但用了System.Net.Mail 这个发邮件

 

显示的信息是 邮箱的前缀, 不知能否 显示 人名 在 收件栏?



 回到顶部
帅哥哟,离线,有人找我吗?
ljh29206
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1368 积分:12189 威望:0 精华:0 注册:2012/3/5 11:32:00
  发帖心情 Post By:2015/10/11 22:39:00 [显示全部帖子]

好的 谢谢咯

message.BodyEncoding = System.Text.Encoding.UTF8

在问下 老是  body 里面的 文字 能否 修改为  想 excel 里面的 选择的字体 及颜色哇

 回到顶部
帅哥哟,离线,有人找我吗?
ljh29206
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1368 积分:12189 威望:0 精华:0 注册:2012/3/5 11:32:00
  发帖心情 Post By:2015/10/12 10:03:00 [显示全部帖子]

<html><body><p>
<span style="font-family:FangSong_GB2312;">&nbsp;
</p>
<p>
<span style="font-family:FangSong_GB2312;">测试</span>
</p>
<p>
<span style="background-color:#009900;">测试</span></span><span style="font-family:FangSong_GB2312;color:#e53333;font-size:18px;">
</p>
<p>
<span style="font-family:FangSong_GB2312;">测试</span>
</p>
</span>
<p>
<span style="font-family:FangSong_GB2312;color:#e53333;font-size:18px;"></span>&nbsp;
</p>
<p>
<span style="font-family:FangSong_GB2312;color:#e53333;font-size:18px;"></span>&nbsp;
</p>
 
会议情况:
_________________________________________________________________
会议时间:  2015/10/14 8:58:00  至  2015/10/14 9:58:00
 
会议室 :  工场培训室
 
与会人员:收件人.
 
敬请各位准时参加!
_________________________________________________________________</body></html>

 

代码如下

 
message.Body = "<html><body>" & nrong & vbcrlf & vbcrlf & "会议情况:" & vbcrlf & tuan & vbcrlf & "会议时间:  " &  e.Form.Controls("DateTimePicker1").value  & "  至  " & e.Form.Controls("DateTimePicker2").value  _
        & vbcrlf & vbcrlf &  "会议室 :  " & e.Form.Controls("dropbox3").text  & vbcrlf & vbcrlf &   "与会人员:收件人."  & vbcrlf & vbcrlf & "敬请各位准时参加!" & vbcrlf & tuan & "</body></html>"

 

老师 收到的 邮件 没显示程 html 格式! 不知道哪里错了


 回到顶部
帅哥哟,离线,有人找我吗?
ljh29206
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1368 积分:12189 威望:0 精华:0 注册:2012/3/5 11:32:00
  发帖心情 Post By:2015/10/15 12:30:00 [显示全部帖子]

Dim client As New System.Net.Mail.SmtpClient()
client.Host = "smtp.126.com"
client.Credentials = New System.Net.NetworkCredential("lin_hailun@126.com", "6849338.")
client.DeliveryMethod = System.Net.Mail.SmtpDeliveryMethod.Network
Dim message As New System.Net.Mail.MailMessage("lin_hailun@126.com", "2450314695@qq.com")
message.Subject = "邮件测试"
message.BodyEncoding = System.Text.Encoding.UTF8

Dim content As String

content &= "这是文字" & vbcrlf
content &= "也是文字"

message.Body = content

Try
    client.Send(message)
    msgbox("发送成功")
Catch ex As Exception
    msgbox("发送失败:" & ex.message)
End Try

 

老师 我测试的是否发觉 如果邮件多  msgbox 会很久才弹出来,

 

问下 我想做一个 邮件发送的 进度条,  如何 判断 开机及结束 的值?


 回到顶部
总数 11 1 2 下一页