sorry,我試了也不行,會出現找不到檔案的錯誤訊息.
--
[;33;45m◣ [1;31m., [33m 140.115.82.150 [37m 所發表之文章 [m
[;33;45m█◣ [1;31m-●- [33m◢█◣ [32m/" [37m‧ [36m國立中央大學 資訊管理研究所 [m
[;31;44m == [1;33m◢████◣ [37m‧ [32m破曉時刻 sunrise.twbbs.org [m
這個問題應該可以用Automation來解決,首先在專案\設定使用元件中增加
Outlook Object Library,再以Dim建立物件變數,然後以CreateObject函數將
Automation物件載入到該物件變數
Ex. Dim Out as Object
Set out=CreateObject("Outlook.Applicaton")
再利用OutLook提供的CreateItem來寄信
詳細的內容可以察看Step by Step Microsoft Visual Basic 6.0自學手冊
Microsoft Press出的,P.402-P.403,有更詳細的說明。
--
※ Origin: 楓橋驛站<bbs.cs.nthu.edu.tw> ◆ From: t199-213.dialup.seed.net.tw