tempad
ReadyGo!技术成就梦想 >>VB教程 >> 在VB中用Outlook发电子邮件

在VB中用Outlook发电子邮件

ReadyGo!技术成就梦想 网络搜索 efish 2008-2-24 2:47:35
在开始编写代码之前，先添加对Outlook8.0objectlibrary的引用。

代码如下：

OptionExplicit

DimAppAsObject
DimItmAsObject

SetApp=CreateObject("Outlook.Application")
SetItm=App.CreateItem(0)
WithItm
.Subject="AtipfromvbCodeMagician"
.To="newvb@21cn.com"
.Body="VB编程乐园www.vbeden.com".Send
EndWith->

责任编辑: efish 参与评论 查找更多：
相关文章
在VB中实现文件上传 在VB中实现文件上传
在VB中使用UDP协议 在VB中使用UDP协议
在VB中如何得到网络中某一台电脑(电脑名)的网卡地址？ 在VB中如何得到网络中某一台电脑(电脑名)的网卡地址？
VB邮件检查程序（二） VB邮件检查程序（二）
VB邮件检查程序（一） VB邮件检查程序（一）
PING一个IP地址（向它发送一个数据包并等待回应)） PING一个IP地址（向它发送一个数据包并等待回应)）
用VB编写标准CGI程序（上） 用VB编写标准CGI程序（上）
用VB编写异步多线程下载程序 用VB编写异步多线程下载程序
跟我学做记事本 跟我学做记事本
制作带有动画和声音的屏幕保护程序 制作带有动画和声音的屏幕保护程序
2秒记住本站域名

玩过泡泡龙吗？Readygo?Go! 再加上.Com.Cn的后缀，那就是大名小顶的ReadyGo.com.cn

分类导航
ReadyGo!技术成就梦想