Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
VFP and Outlook and Signature
Message
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Environment versions
Visual FoxPro:
VFP 9 SP2
Miscellaneous
Thread ID:
01414961
Message ID:
01415269
Views:
64
Any time

>Cool stuff Sergey. Thanks.
>
>>In case of multiple signatures you'll need to now which one is default. Only way I found is through Word automation. Tested in Outlook 2003 and later.
>>
>>loWord = CREATEOBJECT("Word.Application")
>>loEmOpt = loWord.EmailOptions
>>loOlSig = loEmOpt.EmailSignature
>>lcSigFileName = ALLTRIM(loOlSig.NewMessageSignature )
>>* Text signature
>>lcPathAndFile = lcFilePath + lcSigFileName + ".txt"
>>IF FILE(lcPathAndFile )
>>	lcTextIn = FILETOSTR(lcPathAndFile  )
>>	
>>	IF  LEFT( lcTextIn ,2) = 0hFFFE
>>		lcTextIn = SUBSTR(lcTextIn,3)		
>>	ENDIF	
>>	
>>	lcFileContent = STRCONV(lcTextIn ,6)	
>>ENDIF
>>
--sb--
Previous
Reply
Map
View

Click here to load this message in the networking platform