[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[文件操作] 【已解决】批处理根据分辨率移动文件的问题?

本帖最后由 clcms 于 2015-11-2 08:52 编辑
  1. @echo oN 2>nul 3>nul
  2. set "SourceDir=D:\1"
  3. set "DestDir=D:\Wallpaper"
  4. if not exist "%DestDir%" md "%DestDir%"
  5. for /f "tokens=1,2 delims=:" %%a in ('pvw32con "%SourceDir%\*.jpg"') do  ( for /f "tokens=1,2 delims=x," %%i in ("%%b") do      ( if %%i EQU 1920x1080 ( set /a "1 / (%%i0 / %%j - 16)" || (      move "%%a" "%DestDir%\"     ) )      )    )
复制代码
结果如下:


D:\5>set "SourceDir=D:\1"

D:\5>set "DestDir=D:\Wallpaper"

D:\5>if not exist "D:\Wallpaper" md "D:\Wallpaper"

D:\5>for /F "tokens=1,2 delims=:" %a in ('pvw32con "D:\1\*.jpg"') do (for /F "tokens=1,2 delims=x," %i in ("%b") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "%a" "D:\Wallpaper\"      ) ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1080x1920, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "0ec9f4bfb71ea908c68d6c05d1c29abe56a33eedadd38cc6b75f229d14e1dee1.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1080 EQU 1920x1080 (set /a "1 / (10800 / 1920 - 16)"   || (move "0ec9f4bfb71ea908c68d6c05d1c29abe56a33eedadd38cc6b75f229d14e1dee1.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("150x150, 256 colors, Portable Network Graphics, Deflating") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "1327e38d463a059125f5539073b815eea338452a2e2ffc7c8a2e467e20ae9615.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 150 EQU 1920x1080 (set /a "1 / (1500 / 150 - 16)"   || (move "1327e38d463a059125f5539073b815eea338452a2e2ffc7c8a2e467e20ae9615.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1080x1920, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "19fc758b9ac21ab28fc662c27fc54aeb4e801b0a1b6fd05f75d2546d425a489e.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1080 EQU 1920x1080 (set /a "1 / (10800 / 1920 - 16)"   || (move "19fc758b9ac21ab28fc662c27fc54aeb4e801b0a1b6fd05f75d2546d425a489e.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1080x1920, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "21a1dae4eb91a76486c351728653ff12a983093196af9811d75630deaa163452.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1080 EQU 1920x1080 (set /a "1 / (10800 / 1920 - 16)"   || (move "21a1dae4eb91a76486c351728653ff12a983093196af9811d75630deaa163452.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1080x1920, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "22d135c3a634952a9017f07b1aa28835fc6b10deb494adaba5be7fcc573414ac.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1080 EQU 1920x1080 (set /a "1 / (10800 / 1920 - 16)"   || (move "22d135c3a634952a9017f07b1aa28835fc6b10deb494adaba5be7fcc573414ac.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1920x1080, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "2e65e1231cd96975d1496d6448aaea263e9106a3eec9d2c7c2ef752dc4a85a76.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1920 EQU 1920x1080 (set /a "1 / (19200 / 1080 - 16)"   || (move "2e65e1231cd96975d1496d6448aaea263e9106a3eec9d2c7c2ef752dc4a85a76.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1920x1080, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "392edf8b98da8bb2a7b83b8721b3ac48fffcba79102c54abf585566601477301.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1920 EQU 1920x1080 (set /a "1 / (19200 / 1080 - 16)"   || (move "392edf8b98da8bb2a7b83b8721b3ac48fffcba79102c54abf585566601477301.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1920x1080, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "3bce8d813a8004fee3e693befcfdf1cbb6e363eef57b70388357125dd9552ac1.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1920 EQU 1920x1080 (set /a "1 / (19200 / 1080 - 16)"   || (move "3bce8d813a8004fee3e693befcfdf1cbb6e363eef57b70388357125dd9552ac1.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1920x1080, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "42f92ee8677698d6e1e9c7cd094e6611d00dbc5224dafc1436b3b75fcdd4a54c.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1920 EQU 1920x1080 (set /a "1 / (19200 / 1080 - 16)"   || (move "42f92ee8677698d6e1e9c7cd094e6611d00dbc5224dafc1436b3b75fcdd4a54c.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("150x150, 32bit, Portable Network Graphics, Contains alpha-channel, Deflating") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "734309f368ecd7408bf459a11f6432ad0e6dc18fa6b195bd1bd15993eb11a1ed.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 150 EQU 1920x1080 (set /a "1 / (1500 / 150 - 16)"   || (move "734309f368ecd7408bf459a11f6432ad0e6dc18fa6b195bd1bd15993eb11a1ed.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1920x1080, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "7367e80acf148fdac5085eef5cfda75dc7236e5ed0cbcc44f3ab9955209e2614.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1920 EQU 1920x1080 (set /a "1 / (19200 / 1080 - 16)"   || (move "7367e80acf148fdac5085eef5cfda75dc7236e5ed0cbcc44f3ab9955209e2614.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1920x1080, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "7cc1f5dce471dd272ac5737406cf10c2c3d1d7125ac9d2444d6cc6cdb9ce1f89.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1920 EQU 1920x1080 (set /a "1 / (19200 / 1080 - 16)"   || (move "7cc1f5dce471dd272ac5737406cf10c2c3d1d7125ac9d2444d6cc6cdb9ce1f89.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1080x1920, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "8877057cebb324c490f6e026e8c000002f96d701c83474d04c7400839bc9fb81.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1080 EQU 1920x1080 (set /a "1 / (10800 / 1920 - 16)"   || (move "8877057cebb324c490f6e026e8c000002f96d701c83474d04c7400839bc9fb81.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("150x150, 24bit, Portable Network Graphics, Deflating") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "8bebae6d6c97c8dda8dc06dedfd3d5f9c455263177f685738187c009e3e69a38.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 150 EQU 1920x1080 (set /a "1 / (1500 / 150 - 16)"   || (move "8bebae6d6c97c8dda8dc06dedfd3d5f9c455263177f685738187c009e3e69a38.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1920x1080, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "8d71495e43fa1c6887a8840aa45ba74a29a2ff6c7493d8e4c8594a937700a12e.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1920 EQU 1920x1080 (set /a "1 / (19200 / 1080 - 16)"   || (move "8d71495e43fa1c6887a8840aa45ba74a29a2ff6c7493d8e4c8594a937700a12e.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1920x1080, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "8f7bb8973571a2de584685c9b6dc65b9e51d070d7fdad42ae2abd62d3be76c5e.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1920 EQU 1920x1080 (set /a "1 / (19200 / 1080 - 16)"   || (move "8f7bb8973571a2de584685c9b6dc65b9e51d070d7fdad42ae2abd62d3be76c5e.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1080x1920, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "943a5c2888e5803fee7763aa64c8ecfa24bc6a08d50ccd1aeae620d3b40d68d1.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1080 EQU 1920x1080 (set /a "1 / (10800 / 1920 - 16)"   || (move "943a5c2888e5803fee7763aa64c8ecfa24bc6a08d50ccd1aeae620d3b40d68d1.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1080x1920, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "99efb96d8bfaa89f0b62976cf2ae2412d08fc5f8f3714720f1b9ad62274e2226.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1080 EQU 1920x1080 (set /a "1 / (10800 / 1920 - 16)"   || (move "99efb96d8bfaa89f0b62976cf2ae2412d08fc5f8f3714720f1b9ad62274e2226.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1920x1080, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "9bd0b59b87ae036fd1be29d98e42fc87ee9b096f97f4a002b766a85b3b596450.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1920 EQU 1920x1080 (set /a "1 / (19200 / 1080 - 16)"   || (move "9bd0b59b87ae036fd1be29d98e42fc87ee9b096f97f4a002b766a85b3b596450.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1920x1080, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "9f5e823b2eb3bc7bfe4761c69f7bbae5977c4598bb5c6dd930e69482295e7461.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1920 EQU 1920x1080 (set /a "1 / (19200 / 1080 - 16)"   || (move "9f5e823b2eb3bc7bfe4761c69f7bbae5977c4598bb5c6dd930e69482295e7461.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("150x150, 32bit, Portable Network Graphics, Contains alpha-channel, Deflating") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "9f6847b034d065301a629afb5321b98eed5346e0aaa5e9549bb01a924e3b01ea.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 150 EQU 1920x1080 (set /a "1 / (1500 / 150 - 16)"   || (move "9f6847b034d065301a629afb5321b98eed5346e0aaa5e9549bb01a924e3b01ea.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1080x1920, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "a9c76416b44c8b9c8311d76c9518be97838a5a532338a19c5ac98f91c9936821.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1080 EQU 1920x1080 (set /a "1 / (10800 / 1920 - 16)"   || (move "a9c76416b44c8b9c8311d76c9518be97838a5a532338a19c5ac98f91c9936821.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1080x1920, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "bd6d0a9ad57feaa1df39a98796ff133bd9146b84fca9130c4ce7a4bf9143117c.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1080 EQU 1920x1080 (set /a "1 / (10800 / 1920 - 16)"   || (move "bd6d0a9ad57feaa1df39a98796ff133bd9146b84fca9130c4ce7a4bf9143117c.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1080x1920, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "c166f9c4020ef1317465f098cfb2d8601d787adc56828676afd60fece3fd0c6f.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1080 EQU 1920x1080 (set /a "1 / (10800 / 1920 - 16)"   || (move "c166f9c4020ef1317465f098cfb2d8601d787adc56828676afd60fece3fd0c6f.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1920x1080, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "c4747aba2b1d08a4ae6c6db06fe5eac74511fbe421e7243eaa5e480db03bf5d9.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1920 EQU 1920x1080 (set /a "1 / (19200 / 1080 - 16)"   || (move "c4747aba2b1d08a4ae6c6db06fe5eac74511fbe421e7243eaa5e480db03bf5d9.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1920x1080, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "c906934da4f7ca608e62c8a479610e112b047224ecfdf4cb8c2c98c309a438df.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1920 EQU 1920x1080 (set /a "1 / (19200 / 1080 - 16)"   || (move "c906934da4f7ca608e62c8a479610e112b047224ecfdf4cb8c2c98c309a438df.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("150x150, 256 colors, Portable Network Graphics, Deflating") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "ca85fb45f8205bc2d440952050cd9ae9ed23a65a3e56c5efd1bc75dbc617ba96.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 150 EQU 1920x1080 (set /a "1 / (1500 / 150 - 16)"   || (move "ca85fb45f8205bc2d440952050cd9ae9ed23a65a3e56c5efd1bc75dbc617ba96.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1080x1920, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "e4e7d4e9e8893b8c90a0f8057239ccecd87b0121d57ad647d418f0f2b5b98bce.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1080 EQU 1920x1080 (set /a "1 / (10800 / 1920 - 16)"   || (move "e4e7d4e9e8893b8c90a0f8057239ccecd87b0121d57ad647d418f0f2b5b98bce.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1080x1920, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "f86f10471bebfd733bab8eed2de31b62729dd93e1e1da45afad9c156fe12b84c.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1080 EQU 1920x1080 (set /a "1 / (10800 / 1920 - 16)"   || (move "f86f10471bebfd733bab8eed2de31b62729dd93e1e1da45afad9c156fe12b84c.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("150x150, 32bit, Portable Network Graphics, Contains alpha-channel, Deflating") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "fce0add25078660812de84437aae6b4c5e4560dda18422150107f5c274a11794.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 150 EQU 1920x1080 (set /a "1 / (1500 / 150 - 16)"   || (move "fce0add25078660812de84437aae6b4c5e4560dda18422150107f5c274a11794.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1920x1080, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "ffc286f271c4818e91e8ce24aac9053e34e2a68dee29c7f6ee0d4989e921b55d.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1920 EQU 1920x1080 (set /a "1 / (19200 / 1080 - 16)"   || (move "ffc286f271c4818e91e8ce24aac9053e34e2a68dee29c7f6ee0d4989e921b55d.jpg" "D:\Wallpaper\"      ) ) )

D:\5>(for /F "tokens=1,2 delims=x," %i in ("1080x1920, 24bit, Exif JPEG, Lossy + Huffman coding") do (if %i EQU 1920x1080 (set /a "1 / (%i0 / %j - 16)"   || (move "fff8a44cda7c99cd9b9178712ad900b7d355898ab4b299bda6a858b460e3b8b7.jpg" "D:\Wallpaper\"      ) ) ) )

D:\5>(if 1080 EQU 1920x1080 (set /a "1 / (10800 / 1920 - 16)"   || (move "fff8a44cda7c99cd9b9178712ad900b7d355898ab4b299bda6a858b460e3b8b7.jpg" "D:\Wallpaper\"      ) ) )

D:\5>

请问哪里不对呢

我的签名档好看吗

TOP

本帖最后由 WHY 于 2015-11-1 14:33 编辑

宽x高=1920x1080 和 宽:高=1.6:1 这两个条件不可能同时满足

宽x高=1920x1080
  1. @echo off
  2. set "SourceDir=D:\1"
  3. set "DestDir=D:\Wallpaper"
  4. if not exist "%DestDir%" md "%DestDir%"
  5. for /f "delims=:" %%a in ('pvw32con "%SourceDir%\*.jpg"^|find ":1920x1080,"') do (
  6.     move "%SourceDir%\%%a" "%DestDir%\"
  7. )
  8. pause
复制代码
宽:高=1.6:1
  1. @echo off
  2. set "SourceDir=D:\1"
  3. set "DestDir=D:\Wallpaper"
  4. if not exist "%DestDir%" md "%DestDir%"
  5. for /f "tokens=1,2 delims=:" %%a in ('pvw32con "%SourceDir%\*.jpg"') do (
  6.     for /f "tokens=1,2 delims=x," %%i in ("%%b") do (
  7.         set /a "1 / (%%i0 / %%j - 16)" || move "%SourceDir%\%%a" "%DestDir%\"
  8.     )
  9. ) 2>nul
  10. pause
复制代码
2

评分人数

TOP

返回列表