获取文件更详细的属性

filepath := "C:WindowsSystem32notepad.exe"	;set the target full file path

SplitPath, filepath , FileName, DirPath,

objShell := ComObjCreate("Shell.Application")
objFolder := objShell.NameSpace(DirPath)		;set the directry path
objFolderItem := objFolder.ParseName(FileName)	;set the file name

Loop 283
   if propertyitem := objFolder.GetDetailsOf(objFolderItem, A_Index)
      properties .= A_Index . " " .  objFolder.GetDetailsOf(objFolder.Items, A_Index) . ":`t " . propertyitem . "`n"

msgbox % properties

给TA捐赠
共{{data.count}}人
人已捐赠
其他

获取文件夹详细的属性2

2020-3-9 5:20:44

其他

获取文件类型关联默认图标

2020-3-9 5:22:44

个人中心
购物车
优惠劵
有新私信 私信列表
搜索