VFP 愛用者社區

[215001]

請教各位,我用Outlook Express 寄一封信給我自己,同時附上 C:\test.txt 及 D:\test.txt 兩個同名附件檔

我於程式中收到信後,用 AttachmentPathName 傳回
第1個附件檔名是: .........\test.txt
第2個附件檔名是: .........\test (1).txt .........(是否有方法可知道其原始的檔名也是 test.txt )
因為在信件上看到的也都是 test.txt
先謝了!!!


我的程式碼如下: (含全型空白)
local xi,xj,xses,xmsg

xses=thisform.xses && MAPISession物件 放在表單上
xmsg=thisform.xmsg && MAPIMessage物件 放在表單上

xses.downloadmail=.F.
xses.signon
xmsg.sessionid=xses.sessionid

*開始讀取出信件
xmsg.Fetch
FOR xi=0 TO (xmsg.msgcount-1) && 讀取每一封信
　　xmsg.msgindex=xi && 指定第幾封信
　　xmsg.copy
　　IF xmsg.AttachmentCount=0 && 無附件檔案時
　　　　loop && 讀下一封信
　　ENDIF

　　* 讀取出所有附件檔案
　　FOR xj=0 TO (xmsg.AttachmentCount-1)
　　　　xmsg.AttachmentIndex=xj && 指定第xj個附件
　　　　messagebox( xmsg.AttachmentPathName ) && 顯示檔名
　　NEXT && 處理附件迴圈

NEXT && 處理完全部信件

xses.signoff
set default to c:\test
MESSAGEBOX("完成")

[LiuRambo]

請仔細想想看 為什麼EMAIL內夾帶檔案 重複檔名時會自動加(1)
你就可以知道你自己問的問題答案

[215001]

謝謝 LiuRambo :

上面我會丟2個 test.txt ,只是我去模擬出會有 test (1).txt 的狀況而已

實際上,我每次只丟1個 test.txt 檔案,Outlook Express 收件匣看到的也明明是 test.txt ,
但是 AttachmentPathName 屬性卻顯示 ....\test (1).txt (也不是每次都這樣)
所以我想知道,有沒有方法可取得在收件匣看到的檔名 test.txt
這樣才可確定這是不是我要處理的檔案

[LiuRambo]

除非寄信方願意另外提供來源名稱跟目錄
否則我猜是無解吧

[ckp6250]

沒有使用outlook Express收信的習慣啦(順便推一下, VFP+Gmail)
不過，不知道
messagebox( xmsg.AttachmentPathName ) 和
messagebox( xmsg.Attachmentname )

出來的訊息是否一樣呢?

[215001]

messagebox( xmsg.AttachmentPathName ) 和
messagebox( xmsg.Attachmentname )

結果一樣