AHK_创建数字标记文件夹

#z::
Send,!d
ControlGetText,p,Edit1,A


date=%A_MM%-%A_DD%                         ;  ʱ¼ä×öÎļş¼ĞÃû



n=%p%\%date%                               ;  ¼ÓÉÏ·¾¶



o=%n%                                      ;  ´´½¨Ò»¸öo±äÁ¿£¬¿ª±Ù¿Õ¼ä£¬Â·¾¶ºÍÎļş´æÈë,ÓÃËüÀ´·½±ãÔËËã


while InStr(FileExist(o), "D")
{
	Digital_mark=%A_index%             ;  ¼ÓÉÏÊı×Ö

	o=%n%_%Digital_mark%               ;  ÔËËãÓнá¹ûÁË

}
n=%o%                                      ;  ½á¹û´æ·Ån±äÁ¿µÄ¿Õ¼ä

FileCreateDir, %n%                         ;  ´´½¨Îļş¼Ğ 
Sleep,200
;run %n%
return