谢谢大大分享

有几个是自己瞎琢磨的

@Echo Off
Title Reg Converter v1.2 & Color 1A
cd %systemroot%\system32
call :IsAdmin

REG ADD "HKCR\*\shell\Copy_Full_Path" /v "MUIVerb" /t REG_SZ /d "复制文件相关操作" /f
REG ADD "HKCR\*\shell\Copy_Full_Path" /v "Icon" /t REG_SZ /d "C:\Windows\system32\shell32.dll,4" /f
REG ADD "HKCR\*\shell\Copy_Full_Path" /v "Subcommands" /t REG_SZ /d "" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\Copy as Path" /v "MUIVerb" /t REG_EXPAND_SZ /d "复制文件路径(带引号)" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\Copy as Path" /v "Icon" /t REG_EXPAND_SZ /d "cmd.exe" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\Copy as Path" /v "Position" /t REG_EXPAND_SZ /d "Center" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\Copy as Path\Command" /ve /t REG_EXPAND_SZ /d "cmd.exe /c echo \"%%1\"|clip" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\CopyFile_Name" /v "Muiverb" /t REG_EXPAND_SZ /d "复制文件名" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\CopyFile_Name" /v "Icon" /t REG_EXPAND_SZ /d "powershell.exe" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\CopyFile_Name\Command" /ve /t REG_EXPAND_SZ /d "powershell.exe -NoProfile -ExecutionPolicy Bypass -Command \"Get-Item -LiteralPath '%%1' ^| Select-Object -ExpandProperty Name ^| Set-Clipboard\"" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\CopyFile_Name_NoExt" /v "Muiverb" /t REG_EXPAND_SZ /d "复制文件名(无扩展名)" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\CopyFile_Name_NoExt" /v "Icon" /t REG_EXPAND_SZ /d "powershell.exe" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\CopyFile_Name_NoExt\Command" /ve /t REG_EXPAND_SZ /d "powershell.exe -NoProfile -ExecutionPolicy Bypass -Command \"Get-Item -LiteralPath '%%l' ^| Select-Object -ExpandProperty BaseName ^| ForEach-Object { $_.TrimEnd('\') + $_.BaseName } ^| Set-Clipboard\"" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\copypath" /v "Icon" /t REG_EXPAND_SZ /d "%%SystemRoot%%\System32\WScript.exe,2" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\copypath" /v "MUIVerb" /t REG_SZ /d "复制文件路径(&P)" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\copypath\command" /ve /t REG_EXPAND_SZ /d "mshta vbscript:clipboarddata.setdata(\"text\",\"%%1\")(close)" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\Windows.copyaspatg" /v "MUIVerb" /t REG_EXPAND_SZ /d "复制文件路径(带引号)" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\Windows.copyaspatg" /v "Icon" /t REG_EXPAND_SZ /d "cmd.exe" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\Windows.copyaspatg" /v "Position" /t REG_EXPAND_SZ /d "Center" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\Windows.copyaspatg\Command" /ve /t REG_EXPAND_SZ /d "cmd.exe /c echo \"%%1\"^|clip" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\Windows.PermanentDelete" /v "MUIVerb" /t REG_EXPAND_SZ /d "@shell32.dll,-37394" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\Windows.PermanentDelete" /v "Icon" /t REG_EXPAND_SZ /d "shell32.dll,-240" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\Windows.PermanentDelete" /v "Position" /t REG_EXPAND_SZ /d "Center" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\Windows.PermanentDelete" /v "CommandStateSync" /t REG_EXPAND_SZ /d "" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\Windows.PermanentDelete" /v "ExplorerCommandHandler" /t REG_EXPAND_SZ /d "{E9571AB2-AD92-4ec6-8924-4E5AD33790F5}" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\Windows.selectall" /v "CanonicalName" /t REG_EXPAND_SZ /d "{b33bf5af-76d5-4d10-93e7-d8e22e93798f}" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\Windows.selectall" /v "CommandStateHandler" /t REG_EXPAND_SZ /d "{3756e7f5-e514-4776-a32b-eb24bc1efe7a}" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\Windows.selectall" /v "CommandStateSync" /t REG_EXPAND_SZ /d "" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\Windows.selectall" /v "Description" /t REG_EXPAND_SZ /d "@shell32.dll,-31277" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\Windows.selectall" /v "Icon" /t REG_EXPAND_SZ /d "imageres.dll,-5308" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\Windows.selectall" /v "ImpliedSelectionModel" /t REG_DWORD /d "32" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\Windows.selectall" /v "MUIVerb" /t REG_EXPAND_SZ /d "@shell32.dll,-31276" /f
REG ADD "HKCR\*\shell\Copy_Full_Path\shell\Windows.selectall\command" /v "DelegateExecute" /t REG_EXPAND_SZ /d "{aa28fbc7-59f1-4c42-9fd8-ba2be27ea319}" /f
REG ADD "HKCR\Directory\shell\Copy Path" /v "MUIVerb" /t REG_SZ /d "复制文件夹相关操作(&D)" /f
REG ADD "HKCR\Directory\shell\Copy Path" /v "Icon" /t REG_SZ /d "C:\Windows\system32\shell32.dll,4" /f
REG ADD "HKCR\Directory\shell\Copy Path" /v "Subcommands" /t REG_SZ /d "" /f
REG ADD "HKCR\Directory\shell\Copy Path\shell\Copy Directory Path" /v "MUIVerb" /t REG_SZ /d "复制文件夹路径(带引号)" /f
REG ADD "HKCR\Directory\shell\Copy Path\shell\Copy Directory Path" /v "Icon" /t REG_SZ /d "cmd.exe" /f
REG ADD "HKCR\Directory\shell\Copy Path\shell\Copy Directory Path" /v "Position" /t REG_SZ /d "Center" /f
REG ADD "HKCR\Directory\shell\Copy Path\shell\Copy Directory Path\Command" /ve /t REG_EXPAND_SZ /d "cmd.exe /c echo \"%%1\"|clip" /f
REG ADD "HKCR\Directory\shell\Copy Path\shell\copyDirectorypath" /v "MUIVerb" /t REG_SZ /d "复制文件夹路径(&P)" /f
REG ADD "HKCR\Directory\shell\Copy Path\shell\copyDirectorypath" /v "Icon" /t REG_EXPAND_SZ /d "%%SystemRoot%%\System32\WScript.exe,2" /f
REG ADD "HKCR\Directory\shell\Copy Path\shell\copyDirectorypath\command" /ve /t REG_EXPAND_SZ /d "mshta vbscript:clipboarddata.setdata(\"text\",\"%%1\")(close)" /f
REG ADD "HKCR\Directory\shell\Copy Path\shell\copyfilenamelisttoclip" /v "MUIVerb" /t REG_EXPAND_SZ /d "复制文件夹内所有文件完全路径到粘贴板(方便统计文件个数，有多少行就有多少个文件)" /f
REG ADD "HKCR\Directory\shell\Copy Path\shell\copyfilenamelisttoclip" /v "Icon" /t REG_EXPAND_SZ /d "cmd.exe" /f
REG ADD "HKCR\Directory\shell\Copy Path\shell\copyfilenamelisttoclip\Command" /ve /t REG_SZ /d "cmd.exe /c dir \"%%L\" /b /s^|clip" /f
REG ADD "HKCR\Directory\shell\Copy Path\shell\copyfilenametoclip" /v "MUIVerb" /t REG_EXPAND_SZ /d "复制文件夹内所有文件名到粘贴板" /f
REG ADD "HKCR\Directory\shell\Copy Path\shell\copyfilenametoclip" /v "Icon" /t REG_EXPAND_SZ /d "cmd.exe" /f
REG ADD "HKCR\Directory\shell\Copy Path\shell\copyfilenametoclip\Command" /ve /t REG_EXPAND_SZ /d "cmd.exe /c dir \"%%L\" /b /a:-d /o:n^|clip" /f
pause

:IsAdmin
Reg.exe query "HKU\S-1-5-19\Environment"
If Not %ERRORLEVEL% EQU 0 (
Cls & Echo You must have administrator rights to continue ...
Pause & Exit
)
Cls
goto:eof

我也分享一个，

谢谢楼主分享！！！！！！！！！

这个不错 谢谢分享

选中多个文件时会报错。能加个判断语句之类的吗？

看看这个如何?

谢谢分享！

这个不错，谢谢分享

Thank you very much

谢谢分享

感谢分享

vbs版的复制文件路径在选择多个文件的时候会报错

楼主辛苦了，谢谢楼主，感谢楼主分享，楼主好人一生平安！！！

谢谢分享，有时会用到

感谢分享。

谢谢分享  收藏了

好东东。。。。。。。

楼主辛苦了，谢谢楼主，感谢楼主分享，楼主好人一生平安！！！

谢谢楼主分享

厉害。

学习了

感谢分享！~~

下载收藏，谢谢分享

66666666666666666666666666

baby1277 发表于 2024-10-24 21:07
你看下这个

@baby1277，感谢大神指导！！！

谢谢分享