[AHK]从注册表获取特殊路径

/*
;作者：QQ1576157
;时间：2017年1月7日21:10:39
; 功能： 从注册表获取特殊路径,此方法以支持以下特殊路径，AutoHotkey虽然支持一些特殊路径但还是不全。
;原理：遍历HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders
;可获得路径包括以下特殊位置
CD Burning
PrintHood
{374DE290-123F-4565-9164-39C4925E467B}
Templates
Start Menu
Startup
SendTo
Recent
Programs
Personal
NetHood
My Video
My Pictures
My Music
Local AppData
History
Favorites
Desktop
Cookies
Cache
AppData
*/

dir:=getSpec("Desktop")
;~ dir:=getSpec("My Video")
if InStr(FileExist(dir), "D")
	Run %dir%
	;~ Run,%ComSpec%, %dir%
else
	MsgBox 出错
return


getSpec(str)
{
	Loop, Reg, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders, KVR
	{
		 if a_LoopRegType = key
			value =
		else
		{
			RegRead, value
			if ErrorLevel
				value = *error*
		}
		;~ MsgBox, 4, , %a_LoopRegName% = %value% (%a_LoopRegType%)`n`nContinue?
		;~ IfMsgBox, NO, break
		if (a_LoopRegName=str)  ;桌面在注册表中为Desktop，注意加上引号
			break
	}
	;~ dir:=ParseCmdLine(value)
	;~ StringTrimRight,UserProfileDir, A_AppData, 16 
	;~ StringReplace, dir, value, `%USERPROFILE`%, % UserProfileDir, All
	Transform,dir,Deref,%value%
	return dir
}

参考：

 实现当前目录下开启CMD - N3verL4nd - 博客园 http://www.cnblogs.com/lgh1992314/p/5834693.html

得到win7 win8的桌面句柄 - whatday的专栏 - 博客频道 - CSDN.NET http://blog.csdn.net/whatday/article/details/8714573