#@&cls&powershell "type '%~0'|out-string|iex"&pause&exit
$a=New-Object -ComObject Shell.Application
dir *.doc|%{
$b=$a.namespace($_.directoryname)
$c=$b.getdetailsof($b.parsename($_.name),21)
ren $_.fullname "$($c+$_.extension)"
}
复制代码

#@&cls&powershell "type %~s0|out-string|iex"&pause&exit
$a=new-object -comobject word.application
dir * -inc *.doc,*.docx|%{
$b=$a.Documents.Open($_.fullname)
$c=$b.range().text.trim().substring(0,5)+$_.extension #5是前5个字
$b.close()
ren $_.fullname $c
}
$a.quit()
复制代码