[文件操作] 批处理怎样提取文件夹下不同类型名的xlsx？

@echo off
copy "\\192.168.0.3\wcc拆单专用文件夹2019\计料部五金清单\*BOM清单.xlsx" "%~dp0"
复制代码

@echo off
copy "\\192.168.0.3\wcc拆单专用文件夹2019\计料部五金清单\*五金清单.xlsx" "%~dp0"
复制代码

set shell=createobject("shell.application")
set folder=shell.namespace("\\192.168.0.3\wcc拆单专用文件夹2019\计料部五金清单")
set tf=shell.namespace("D:\BOM清单")
m=inputbox("数字")
dd=datediff("d",0,date)
select case m
case 1
for each item in folder.items.Filter(128,"*BOM清单\.xlsx")
md=datediff("d",0,item.modifydate)
if md=dd-1 then
tf.copyhere(item)
end if
next
case 2
for each item in folder.items.Filter(128,"*BOM清单\.xlsx")
md=datediff("d",0,item.modifydate)
if md=dd then
tf.copyhere(item)
end if
next
case 3
for each item in folder.items.Filter(128,"*BOM清单\.xlsx")
md=datediff("d",0,item.modifydate)
if md=dd-1 then
tf.copyhere(item)
end if
next
end select
复制代码