- @set @n=0//& dir /a-d/s/b *.tif| cscript -nologo -e:jscript "%~f0" >a.txt& pause& start notepad a.txt& exit /b
-
- fso = new ActiveXObject("Scripting.FileSystemObject");
- sh = new ActiveXObject("Shell.Application");
- objFolder = sh.NameSpace(0);
- for (i=0; i<255; i++) {
- s = objFolder.GetDetailsOf(null, i);
- if (s=="水平分辩率") x=i;
- if (s=="垂直分辩率") y=i;
- }
- WScript.Echo("文件路径: 水平分辩率, 垂直分辩率");
- ts = WScript.StdIn;
- while (!ts.AtEndOfStream) {
- f = ts.ReadLine();
- objFolder = sh.NameSpace(fso.GetAbsolutePathName(f+"/.."));
- objFolderItem = objFolder.ParseName(fso.GetFileName(f));
- WScript.Echo( f + ":" + objFolder.GetDetailsOf(objFolderItem, x)
- + "," + objFolder.GetDetailsOf(objFolderItem, y) );
- }
复制代码
|