作者taro3750 (taro)
看板EzHotKey
标题Re: [请问] 根据档案建立日期封装至相同目录
时间Wed Aug 4 01:07:49 2010
※ 引述《taro3750 (taro)》之铭言:
: 如题
: 有时候下载东西
: 日积月累会导致目录下的档案很多很杂
: 但通常同一天所下载的内容同质性最高
: 因此想请教版友 AutoHotKey中是否有读取档案之建立日期的函数
: 或是能提供简单的范例供我参考 感谢^^"
目前大致已完成
有兴趣者请小心使用 因为没询问视窗就会直接进行存放
还是新手请多多指教
==============================================================================
;※注:快捷为左alt+1,可将 "C:\Users\Yuhong\Downloads\" 修改成其他目录路径
LAlt & 1::
Loop, C:\Users\Yuhong\Downloads\*.*, , 0 ;先处理档案
{
FileGetTime, OutputVar, %Filename% ;取得个别档案修改日期
FormatTime, OutputVar2, %OutputVar%, MM-dd ;将日期格式设定成 月份-日期
FileCreateDir, C:\Users\Yuhong\Downloads\%OutputVar2% ;建立日期目录
FileMove, %A_LoopFileFullPath%, C:\Users\Yuhong\Downloads\%OutputVar2%
;移动该档案至所属的日期目录
}
Loop, C:\Users\Yuhong\Downloads\*, 2, 0 ;再处理目录
{
FoundPos := RegExMatch(A_LoopFileFullPath, "-\d+$")
if(FoundPos==0){
FileGetTime, OutputVar, %Filename% ;取得个别档案修改日期
FormatTime, OutputVar2, %OutputVar%, MM-dd ;将日期格式设定成 月份-日期
FileCreateDir, C:\Users\Yuhong\Downloads\%OutputVar2% ;建立日期目录
tempDir = C:\Users\Yuhong\Downloads\%OutputVar2%
FileMoveDir, %A_LoopFileFullPath%, %tempDir%\%A_LoopFileName%
;移动该资料夹至所属的日期目录
}
}
==============================================================================
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 59.121.129.122