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

[文件操作] [已解决]批处理怎样遍历子目录查找文件改名?

本帖最后由 swanseabrian 于 2021-11-7 09:32 编辑

遍历子目录查找文件改名

excel a b两列,

a列是要查找的文件名, b列是要修改的文件名

在目录文件夹中(包含子文件夹)中
查找a列中的文件名,查找到后,对应修改为 b列中的文件名,这个要怎么操作,
谢谢

回复 9# swanseabrian
  1. if($d.containskey($e.name)){ren $e.fullname ("$($d[$e.name])"+".jpg")}
复制代码
1

评分人数

TOP

回复 7# idwma


    老铁,现在有个同样的问题,但是 要改的文件名,不带后缀, 这个要怎么加个后缀呀,

之前是找a列的数据文件,改成b列的文件名
现在是要给b列的文件名加个后缀需要,例如后缀是 .jpg,
这个要怎么加上去呢,
就在下面代码里加
  1. #@&cls&powershell "type '%~0'|out-string|iex"&pause&exit
  2. $a=New-Object -ComObject Excel.Application
  3. $b=$a.Workbooks.Open("C:\Users\Administrator\Desktop\bat\1114\1203\图片\图片\经理 - 副本\经理.xlsx")
  4. $c=$b.sheets.item(1)
  5. for($i=1;"$($c.Range("a$i").Text)" -ne "";$i++){
  6.     [hashtable]$d+=@{"$($c.Range("a$i").Text)"="$($c.Range("b$i").Text)"}
  7. }
  8. $a.Workbooks.Close()
  9. foreach($e in dir -r){
  10.     if($d.containskey($e.name)){ren $e.fullname $d[$e.name]+".jpg"}
  11. }
复制代码
最后一行,我加的,显示错误

TOP

回复 7# idwma


    powershell真厉害

TOP

本帖最后由 idwma 于 2021-11-6 20:33 编辑

回复 6# swanseabrian
  1. #@&cls&powershell "type '%~0'|out-string|iex"&pause&exit
  2. $a=New-Object -ComObject Excel.Application
  3. $b=$a.Workbooks.Open("f:\test.xlsx")
  4. $c=$b.sheets.item(1)
  5. for($i=1;"$($c.Range("a$i").Text)" -ne "";$i++){
  6.     [hashtable]$d+=@{"$($c.Range("a$i").Text)"="$($c.Range("b$i").Text)"}
  7. }
  8. $a.Workbooks.Close()
  9. foreach($e in dir -r){
  10.     if($d.containskey($e.name)){ren $e.fullname $d[$e.name]}
  11. }
复制代码
1

评分人数

TOP

回复 5# idwma


    修改成ansi可以了,但是没改名,哪里的问题

TOP

回复 4# swanseabrian


    表格文件的路径填对了吗,安装有excel吗

TOP

回复 2# idwma


   
不能对 Null 值表达式调用方法。
所在位置 行:10 字符: 8
+     if($d.containskey("$e.name")){ren $e.fullname $d[$e.name]}
+        ~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : InvalidOperation: ( [],RuntimeException
    + FullyQualifiedErrorId : InvokeMethodOnNull

不能对 Null 值表达式调用方法。
所在位置 行:10 字符: 8
+     if($d.containskey("$e.name")){ren $e.fullname $d[$e.name]}
+        ~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : InvalidOperation: (:) [],RuntimeException
    + FullyQualifiedErrorId : InvokeMethodOnNull

不能对 Null 值表达式调用方法。
所在位置 行:10 字符: 8
+     if($d.containskey("$e.name")){ren $e.fullname $d[$e.name]}
+        ~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : InvalidOperation: (:) [],RuntimeException
    + FullyQualifiedErrorId : InvokeMethodOnNull

不能对 Null 值表达式调用方法。
所在位置 行:10 字符: 8
+     if($d.containskey("$e.name")){ren $e.fullname $d[$e.name]}
+        ~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : InvalidOperation: (:) [],RuntimeException
报的这是啥错误

TOP

回复 2# idwma


    估计 也只有powershell可以做了吧

TOP

本帖最后由 idwma 于 2021-11-6 19:49 编辑
  1. #@&cls&powershell "type '%~0'|out-string|iex"&pause&exit
  2. $a=New-Object -ComObject Excel.Application
  3. $b=$a.Workbooks.Open("f:\test.xlsx")
  4. $c=$b.sheets.item(1)
  5. for($i=1;"$($c.Range("a$i").Text)" -ne "";$i++){
  6.     [hashtable]$d+=@{"$($c.Range("a$i").Text)"="$($c.Range("b$i").Text)"}
  7. }
  8. $a.Workbooks.Close()
  9. foreach($e in dir -r){
  10.     if($d.containskey("$e.name")){ren $e.fullname $d[$e.name]}
  11. }
复制代码

TOP

返回列表