[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
本帖最后由 WHY 于 2017-9-15 00:26 编辑
  1. @if(0)==(0) echo off
  2. for /f "tokens=1*" %%i in ('dir /b *.jpg *.png *.bmp ^| cscript //nologo //e:jscript "%~f0"') do (
  3.     echo;md %%i
  4.     echo;move "%%j" %%i\
  5. )
  6. pause & goto :EOF
  7. @end
  8. var objShell  = new ActiveXObject('Shell.Application');
  9. var strFolder = WSH.ScriptFullName.replace(/(.+)\\[^\\]+$/, '$1');   //脚本所在文件夹名
  10. var objFolder = objShell.NameSpace(strFolder);
  11. for(var i=0; i<300; i++) {
  12.     if(/^(尺寸|分[辩辨]率)$/.test(objFolder.GetDetailsOf(null, i))){var n = i;}
  13.     //分辨率对应的序号
  14. }
  15. while(!WScript.StdIn.AtEndOfStream) {
  16.     var strFile = WScript.StdIn.ReadLine();              //文件名
  17.     var strExt  = strFile.match(/.+\.([^.]+)$/)[1];      //扩展名
  18.     var objItem = objFolder.ParseName(strFile);
  19.     var res = objFolder.GetDetailsOf(objItem, n).match(/\d+/g).join('x');   //分辨率
  20.     WSH.Echo(res + '\\' + strExt + ' ' + strFile);
  21. }
复制代码
1

评分人数

TOP

回复 7# 老卡机


    strFolder 变量就是当前批处理所在目录,相当于 %~dp0 去掉最后的 "\" 字符。这里是相对路径,所以传递给 md 命令没有意义

如果需要移动到其它目录:
md "D:\Test\%%i"
move "%%j" "D:\Test\%%i"
1

评分人数

TOP

返回列表