[文本处理] [已解决]批处理如何把%var%此类变量不扩展原样保存到剪贴板？

ttszuo

怎样把%ProgramFiles%\Baidu原样保存到剪贴板

@echo off
more +4 %0 >3.vbs
start 3.vbs
exit
str="%ProgramFiles%\Baidu"
Set ws = wscript.createobject("wscript.shell")
ws.run "mshta vbscript:clipboardData.SetData("+""""+"text"+""""+","+""""&str&""""+")(close)",0,true
createobject("scripting.filesystemobject").getfile(wscript.scriptfullname).delete
复制代码

ttszuo

非常感谢

pcl_test

@echo off
::原字符输出则为set "str=%%ProgramFiles%%\Baidu"
set "str=%ProgramFiles%\Baidu"
mshta vbscript:clipboardData.setData("text","%str%")(close)
pause
复制代码

win7及以上系统可以用clip

@echo off
::原字符输出则为echo;^^%%ProgramFiles^^%%\Baidu|clip
echo;%ProgramFiles%\Baidu|clip
pause
复制代码