VFP發送郵件的問題,该如何解决

VFP發送郵件的問題
系統要加個發送郵件的功能，用了出於http://www.vfptop.com/bcxjylist.asp?id=55這個地方的郵件發送的實例，效果不錯。但隨著出現了一個問題。
我系統里調用表單時都沒用絕對路徑，例如do   form   mainform,但當我調用表單給某個郵件地址發信後，整個系統的默認路徑成了這個表單里附件的默認路徑，例如：D:/program   files/outlook   express/，所以當調用發送郵件表單後，再點調用別的表單時，都成了在D:/program   files/outlook   express這個路徑下尋找表單了，所以出錯。不知道如何解決，望大家教教我。

------解决方案--------------------
在程序开头：

PUBLIC gcNowpath
gcNowpath=JUSTPATH(SYS(16))+ ' ' &&获取当前运行程序所在工作目录。
SET DEFAULT TO (gcNowpath)