[文本处理] 批处理如何实现用剪贴板里的文字内容来重命名指定文件？

mm123321

就是  文件夹新生成的文件，需要帮它重命名。

名称已经准备好了，就是剪切板的文字，一键把剪切板的文字，重命名给新生成的文件！ 谢谢了   

代码怎么写！

gawk

@echo off
set "OldName=新建文本文件.txt"
set PSCMD=powershell -c "Add-Type -AssemblyName PresentationCore; [Windows.Clipboard]::GetText()"
set "NewName=bbs.bathome.net"
for /f "delims=" %%i in ('%PSCMD%') do (
    set "NewName=%%i"
)
ren "%OldName%" "%NewName%.txt"
复制代码

gawk

@echo off
set "OldName=新建文本文件.txt"
set "NewName=bbs.bathome.net"
for /f "delims=:" %%i in ('findstr /n "^:DynamicScript$" "%~f0"') do (
    more +%%i "%~f0" > "%temp%\GetClip.vbs"
)
for /f "delims=" %%i in ('cscript //nologo %temp%\GetClip.vbs') do (
    set "NewName=%%i"
)
ren "%OldName%" "%NewName%.txt"
goto :eof

:DynamicScript
WScript.Echo CreateObject("htmlfile").parentWindow.clipboardData.getData("Text")
复制代码