|
本帖最后由 baby1277 于 2024-10-23 23:07 编辑
1:"复制为文件名"菜单 没有换行符(少数程序的输入框识别换行符,导致报错)
2:"复制为文件地址"菜单 没有带引号 (系统自带的那个菜单已经被下岗)
- @echo off
- title baby1277
- md C:\Windows\path
- echo for /f "delims=" %%%%a in ('echo "%%name%%"') do set/p="%%%%~nxa"^<nul^|clip>C:\Windows\path\copyname.bat
- echo 添加复制为文件地址右键菜单
- reg delete "HKEY_CLASSES_ROOT\AllFilesystemObjects\shellex\ContextMenuHandlers\CopyAsPathMenu" /f
- reg add "HKEY_CLASSES_ROOT\*\shell\copypath" /v "" /t REG_SZ /d "复制为文件地址(&P)" /f
- reg add "HKEY_CLASSES_ROOT\*\shell\copypath\command" /v "" /t REG_SZ /d "mshta vbscript:clipboarddata.setdata("text","%%1")(close)" /f
- reg add "HKEY_CLASSES_ROOT\*\shell\copyname" /v "" /t REG_SZ /d "复制为文件名(&N)" /f
- reg add "HKEY_CLASSES_ROOT\*\shell\copyname\command" /v "" /t REG_SZ /d "mshta vbscript:CreateObject("WScript.Shell").Run("cmd /c set name=%%1^&call C:\Windows\path\copyname.bat",0)(window.close)" /f
- cls&echo.
- echo 添加完成,1秒后退出。
- timeout /t 2 >nul
复制代码
右键菜单支持文件和文件夹,喜欢收藏起来吧。
|
评分
-
查看全部评分
|