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

Rank: 12Rank: 12Rank: 12

帖子
14777 
积分
45951 
技术
847  
捐助
745  
注册时间
2008-6-9 
1楼 跳转到 »
发表于 2018-9-11 14:48 | 显示全部帖子 
  1. @if(0)==(0) echo off & dir /b /a-d /s *.jpg *.jpeg *.tif *.png 2>nul|cscript -NoLogo -E:JScript %0 >图片尺寸.xls & goto :eof @end

  2. var fso, Img;  

  3. fso = new ActiveXObject("Scripting.FileSystemObject"); 

  4. Img = new ActiveXObject("WIA.ImageFile");

  5. while(!WScript.StdIn.AtEndOfStream){

  6.     var f = fso.GetFile(WScript.StdIn.ReadLine());

  7.     Img.LoadFile(f);

  8.     WSH.Echo(f.ParentFolder.Name + '_' + fso.GetBaseName(f) + '_' + Img.Width + 'x' + Img.Height + '_' + fso.GetExtensionName(f) + '_' + f.Size + '_' + Img.VerticalResolution + 'x' + Img.HorizontalResolution + 'dpi');

  9. }
复制代码
1

评分人数

    • luckcsz: 完美解决，谢谢~！技术 + 1
我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html

TOP

Batcher

Rank: 12Rank: 12Rank: 12

帖子
14777 
积分
45951 
技术
847  
捐助
745  
注册时间
2008-6-9 
2楼
发表于 2018-9-11 14:52 | 显示全部帖子
文件的属性可以参考：
https://msdn.microsoft.com/zh-cn/library/18b41306

图片的属性可以参考：
https://docs.microsoft.com/zh-cn/previous-versions/windows/desktop/wiaaut/-wiaaut-imagefile
我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html

TOP

返回列表