Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
VFP and Outlook and Signature
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Versions des environnements
Visual FoxPro:
VFP 9 SP2
Divers
Thread ID:
01414961
Message ID:
01415269
Vues:
61
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--
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform