114.htm

来自「VB的一些网络编程的例子,个人认为还不错。大家一起来研究一下.」· HTM 代码 · 共 21 行

<p>在VB中用Outlook发电子邮件 </p>
<p></p>
<p>在开始编写代码之前，先添加对Outlook 8.0 object library的引用。</p>
<p></p>
<p>代码如下：</p>
<p></p>
<p>Option Explicit</p>
<p></p>
<p>Dim App As Object</p>
<p>Dim Itm As Object</p>
<p></p>
<p>Set App = CreateObject("Outlook.Application")</p>
<p>Set Itm = App.CreateItem(0)</p>
<p>With Itm</p>
<p>.Subject = "A tip from vbCode Magician"</p>
<p>.To = "[e-mail]"</p>
<p>.Body = </p>
<p>"认住新VB，真材实料有保证" .Send</p>
<p>End With</p>
<p></p>