什么意思,不用outlook,可以用foxmail,方正飞扬,等等许多软件都可以吗!
解决方案 »
- 求教!vb中调用OdbcExt函数显示错误
- 关于vb中sql语句的单引号和双引号的用法,我老搞不清楚
- 如何利用shell调用DOS命令中的net time \\机器名来同步机器的时间??
- 一个关于Left、Top属性的问题
- 问一个简单的问题
- 有关释放excel对象的问题
- 求字符串,用"[]"分隔中的内容如 IF [H1] > [C5] THEN 要求返回 H1 , C5
- 跪求高手!关于用键盘向下键改变曲线上点值的大小
- 求实例,熟悉【CorelDraw VBA】的朋友请帮下忙
- 高分紧急求救:关于调用组件实现从excel导入数据到SQL Server的问题
- 如何用VB建立链表
- 我觉得,在VB里UPDATE一个记录时,好象不用上锁,也不会冲突(多用户、多任务时)?
去看一下MSDN自带的例子。
Set Olapp = CreateObject("outlook.application")
Set Oitem = Olapp.CreateItem(0)
With Oitem
.Subject = gDepa_Name
.body = "Any thing that you want to say...."
.To = "[email protected]"
.send
End With
建立一个窗体,仿造Outlook的格式:目标地址、正文、主题,然后将Oitem.body, Oitem.subject, Oitem.to 的值换一下就可以了。不过这样启动速度较慢。
你还可以用Winsock发送,但设置就麻烦多了。