[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
本帖最后由 Nsqs 于 2023-9-5 17:26 编辑
  1. # 2>nul&cls&title by Nsqs&powershell -noprofile -executionpolicy bypass "gc '%~f0'|Out-String|iex" & pause&exit
  2. $esc=[char]0x1b
  3. $ReadDate=-1
  4. $SourcePath=[System.IO.DirectoryInfo]::new('.').FullName
  5. $wa=New-Object -ComObject Word.Application
  6. $Main=$wa.Tasks|?{$_.Name -match 'by Nsqs'}
  7. do{
  8. cls
  9. " 使用方法
  10. $esc[92m输入日期时间,会计算当前目录下创建日期为前一天的文件$esc[0m
  11. 比如输入:  $esc[96m参数 说明$esc[0m
  12. $esc[93m输入参数$esc[0m   $esc[6;91m2023-9-20$esc[0m 那么会取当前目录下 $esc[91m2023$esc[0m $esc[94m年 $esc[91m9$esc[0m $esc[94m月$esc[0m $esc[91m19$esc[0m $esc[94m日$esc[0m 这一天的日期的文件, 输入格式随意 xxxx-/xx-/xx 都行
  13. $esc[93m输入参数$esc[0m   $esc[6;91m-d$esc[0m $esc[91mD:\ABC$esc[0m 会跳转至目标路径,然后可以再做处理
  14. $esc[93m输入参数$esc[90m   $esc[6;91m-e$esc[0m 设置需要处理的文件, 或多个文件以逗号分隔,比如 $esc[91m*.txt,*.xlsx$esc[0m 等等
  15. $esc[93m输入参数$esc[90m   $esc[6;91m-r$esc[0m 返回当前目录
  16. $esc[93m示例:$esc$esc[94m
  17. -d C:\sample\ -e *.txt$esc[0m
  18. "
  19. "当前目录所在地址:`n$esc[94m$((gl).Path)$esc[0m`n"
  20. "当前可能指向的文件:`n$esc[6;94m$(if(!$ext){'所有文件'}else{$ext})$esc[0m`n"
  21.     if($ReadDate -match '^(-d|-e)$'){"$esc[91m参数必须包含空格隔开!$esc[0m"}
  22. $ReadDate=Read-Host @(if($ReadDate -eq -1 -or $ReadDate -match '-[ed]'){'请输入日期'}elseif($ReadDate -notmatch '\d{4}.\d+.?\d*' -and $ReadDate){'输入的不是日期格式'}else{'输入不能为空!(可输入q退出)'})
  23. if($ReadDate -match '-d '){pushd ([regex]::Matches($ReadDate,'.*-d (.+?) +?.*').groups[1].value)}
  24. if($ReadDate -match '-e '){$ext=[regex]::Matches($ReadDate,'.*-e (.+ *).*').groups[1].value}
  25. if($ReadDate -match '^-r$'){pushd $SourcePath}
  26. }until($ReadDate -eq 'q' -or $ReadDate -match '\d{4}.\d+.?\d*' -and $ReadDate -notmatch '^-d \d{4}.\d+.?\d*$')
  27. if($ReadDate -eq 'q'){$Main.Close();return}
  28. $ReadDate=$ReadDate -replace ' *-d \d{4}.\d+.?\d* *'
  29. $ReadDate=[regex]::Matches($ReadDate,'.*(\d{4}.\d+.?\d*).*').groups[1].value
  30. if($ReadDate -match '^\d{4}.\d+$'){
  31. $ReadDate=[datetime]$ReadDate
  32. $lastDay=[datetime]::DaysInMonth($ReadDate.Year,$ReadDate.Month)
  33. $ReadDate=[datetime]"$($ReadDate.ToString('yyyy-MM'))-$lastDay"
  34. }else{
  35. $ReadDate=[datetime]$ReadDate
  36. }
  37. $FileDate=dir $ext -File|?{$_.CreationTime.Date -eq $ReadDate.AddDays(-1)}
  38. if(!$FileDate){"$esc[91m发现没有找到当前目录下昨天的日期类文件$esc[0m";return}
  39. $FileDate|%{
  40. $folder=([datetime]$ReadDate).AddDays(-1).ToString('yyyy-MM-dd')
  41. md $folder -Force
  42. move $_ $folder -Force
  43. }
  44. "$esc[91m`n`n处理完毕!$esc[0m"
复制代码
以文件创建日期为准

TOP

返回列表