Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Default E-mail client
Message
 
 
À
29/03/2006 08:20:59
Information générale
Forum:
Visual FoxPro
Catégorie:
Applications Internet
Versions des environnements
Visual FoxPro:
VFP 7 SP1
OS:
Windows XP SP2
Network:
Windows XP
Database:
Visual FoxPro
Divers
Thread ID:
01108755
Message ID:
01108781
Vues:
12
>What is the easiest way of determining the default e-mail client from with in Foxpro
>
>Thanks
>Curt
#define HKEY_CLASSES_ROOT           -2147483648  && (( HKEY )
*0x80000000 )
#define HKEY_CURRENT_USER           -2147483647  && (( HKEY )
*0x80000001 )
#define HKEY_LOCAL_MACHINE          -2147483646  && (( HKEY )
*0x80000002 )
#define HKEY_USERS                  -2147483645  && (( HKEY )
*0x80000003 )
local oRegistry, lcMailClient
oRegistry = newobject("Registry","Registry.prg")
**** getting the default email client NAME! **********
lcMailClient = ;
	oRegistry.ReadRegistryString(HKEY_LOCAL_MACHINE,;
	"Software\Clients\Mail", ;
	"")

if empty(m.lcMailClient)
	=messagebox("No email client installed")
	return ""
endif

return m.lcMailClient
Use any class for reading registry information.
If it's not broken, fix it until it is.


My Blog
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform