好累啊,^_^
解决方案 »
- Tserversocket是怎么接收移动设备的数据的呀?delphi中
- dbcombobox下拉风格设置为dropdownlist风格后为后无法获得数据字段的值?
- 紧急求助:如何解决在(50万条)数据库中对query搜索出来数据进行Edit,Post特慢的问题
- 求寻!
- 如何知道一个ACCESS数据库中有哪些表?
- 中国最早的非典记载
- 请教:Delphi的很多实例类中都有Free和Destroy方法,请问:
- 请问,誰有SQL SERVER中关于Formula(公式)的详细说明?那帮助文件不知所云
- 关于电子书,大家帮帮我。
- 一个ClientSocket如何一个接一个连接ServerSocket!真的没有人会吗?
- 向高手求救:I/O ERROR 问题!急啊!
- delphi打包问题
謝謝﹗愛死你了。
晕!跑啊!
Private Sub send_click() Dim outObj As New Outlook.Application 'Dim myItem As Outlook.MailItem
Set outObj = CreateObject("Outlook.application")
Set myItem = outObj.CreateItem(olMailItem)
myItem.To = "[email protected] " myItem.Subject = "hello" myItem.Body = "hell" myItem.Attachments.Add ("C:\2\mail\zl.xls") myItem.sendEnd Sub
为什么发不出去啊?
smile0913(冰颜傲雪) ( 可以我多给点分就行了 。