谢谢大大分享 |
有几个是自己瞎琢磨的 |
@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,感谢大神指导!!! |
谢谢分享 |
Powered by Discuz! X3.3
© 2001-2017 Comsenz Inc.