id	summary	reporter	owner	description	type	status	milestone	component	version	severity	resolution	keywords	cc
1644	_InetMail function does not work when Windows Live mail is default client	Emiel Wieldraaijer	Jpm	"The function _InetMail needs some improvements 

Install Outlook 2007 and Windows Live Mail, make Windows Live Mail the default client.

If i take a look at the function _InetMail i see the line RegRead('HKCR\mailto\shell\open\command', """") This retrieves information about Outlook 2007 (in my case) but if i check RegRead('HKCU\Software\Clients\Mail', """") which retrieves the current user default email client i see that Windows Live Mail is default. 

So when you use the function it will open outlook instead of Windows Live Mail

I changed the code to add support for Windows Live Mail (see below) but maybe there is a better way.. 

{{{
Func _INetMail($s_MailTo, $s_MailSubject, $s_MailBody)
	Local $prev = Opt(""ExpandEnvStrings"", 1)
	Local $dflt = RegRead($HKCU & '\Software\Clients\Mail', """")

	If $dflt = ""Windows Live Mail"" Then
		Local $var = RegRead($HKCR & '\WLMail.Url.Mailto\Shell\open\command', """")
	Else
		Local $var = RegRead($HKCR & '\mailto\shell\open\command', """")
	EndIf
	Local $ret = Run(StringReplace($var, '%1', _INetExplorerCapable('mailto:' & $s_MailTo & '?subject=' & $s_MailSubject & '&body=' & $s_MailBody)))
	Opt(""ExpandEnvStrings"", $prev)
	Return $ret
EndFunc   ;==>_INetMail
}}}



"	Bug	closed	3.3.7.0	AutoIt	3.3.6.1	None	Fixed	_InetMail Live Mail Default