搞一个右键菜单“打开xxx并关闭当前资源管理器（已解决）

窄口牛

打开有关联的文件或者exe等可执行文件，然后关闭资源管理器
是不是很有用？

527104427

窄口牛 发表于 2022-11-30 20:59
可能是因为我explorer（桌面）和资源管理器是两个进程？

再试一下：

        set^ EnviMode=1
        set^ ForceLocal=1

        //多开
        REGI $HKCR\*\shell\Locate\\=定位
        REGI $HKCR\*\shell\Locate\\Icon=explorer.exe,0
        REGI $HKCR\*\shell\Locate\Command\\=explorer.exe /n,/select,"%%1"
        REGI $HKCR\Directory\shell\Locate\\=定位
        REGI $HKCR\Directory\shell\Locate\\Icon=explorer.exe
        REGI $HKCR\Directory\shell\Locate\command\\=explorer.exe "%%1"

        //复制路径
        set commandline="%MyName%" team set^ EnviMode=1| set^ ForceLocal=1 | set$ nl=0d 0a| fdir --fullfile --long a="%%1"| fdir --fullfile --short b="%%1"| fdir --fullfile --volume c="%%1"| fdir --fullfile --part d="%%1"| fdrv e=%%%%d%%%%| sed -ex f=0,[^0-9], ,e| mstr * g,h=<1*>f| sed -ex i=1,\\Harddisk%%%%g%%%%Partition%%%%h%%%%\\,\\GLOBALROOT\\device\\harddisk%%%%g%%%%\\partition%%%%h%%%%\\,d| find *<>a, set< a=%%%%nl%%%%| find *<>b, set< b=%%%%nl%%%%| find *<>c, set< c=%%%%nl%%%%| find *<>d, set< d=%%%%nl%%%%| find *<>i, set< i=%%%%nl%%%%| set^ Clipboard=%%%%a%%%%%%%%b%%%%%%%%c%%%%%%%%d%%%%%%%%i%%%%
        REGI $HKCR\*\shell\CopyPaths\\=复制路径(多行)
        REGI $HKCR\*\shell\CopyPaths\\Icon=explorer.exe,0
        REGI $HKCR\*\shell\CopyPaths\Command\\=%commandline%
        REGI $HKCR\Directory\shell\CopyPaths\\=复制路径(多行)
        REGI $HKCR\Directory\shell\CopyPaths\\Icon=explorer.exe,0
        REGI $HKCR\Directory\shell\CopyPaths\command\\=%commandline%

        //结束进程
        set commandline="%MyName%" team set^ EnviMode=1| set^ ForceLocal=1| find --pid*@ a,| set b=%%1| lpos* * * ,*c=b,,a| ifex $%%%%c%%%%>0, forx *v c,d, team~ read -*,%%%%d%%%%,e,a~ mstr* * f=<1>e~ kill *force *%%%%f%%%%
        REGI $HKCR\*\shell\KillApps\\=结束进程(多个)
        REGI $HKCR\*\shell\KillApps\\Icon=taskmgr.exe,0
        REGI $HKCR\*\shell\KillApps\Command\\=%commandline%

        //关闭所在目录
        set commandline="%MyName%" team set^ EnviMode=1| set^ ForceLocal=1| set$ nl=0d 0a| fdir --full a="%%1"| mstr * -delims:\ b=<-1>a| find --class:CabinetWClass --wid@ c,%%%%b%%%%| find --class:CabinetWClass --wid@ d,%%%%a%%%%| set< c=%%%%nl%%%%%%%%d%%%%| forx *nl c,e, team~ mstr* * f=<2>e~ ifex $%%%%f%%%%>0, set @@postmsg=%%%%f%%%%;0x0010;0;0
        REGI $HKCR\*\shell\CloseWindow\\=关闭所在目录(多个)
        REGI $HKCR\*\shell\CloseWindow\\Icon=taskmgr.exe,0
        REGI $HKCR\*\shell\CloseWindow\Command\\=%commandline%
        REGI $HKCR\Directory\shell\CloseWindow\\=关闭所在目录(多个)
        REGI $HKCR\Directory\shell\CloseWindow\\Icon=taskmgr.exe,0
        REGI $HKCR\Directory\shell\CloseWindow\command\\=%commandline%

        //打开后关闭所在目录
        set commandline="%MyName%" team set^ EnviMode=1| set^ ForceLocal=1| set$ nl=0d 0a| exec $"%%1"| fdir --full a="%%1"| mstr * -delims:\ b=<-1>a| find --class:CabinetWClass --wid@ c,%%%%b%%%%| find --class:CabinetWClass --wid@ d,%%%%a%%%%| set< c=%%%%nl%%%%%%%%d%%%%| forx *nl c,e, team~ mstr* * f=<2>e~ ifex $%%%%f%%%%>0, set @@postmsg=%%%%f%%%%;0x0010;0;0
        REGI $HKCR\*\shell\RunCloseWindow\\=打开后关闭所在目录(多个)
        REGI $HKCR\*\shell\RunCloseWindow\\Icon=taskmgr.exe,0
        REGI $HKCR\*\shell\RunCloseWindow\Command\\=%commandline%
        REGI $HKCR\Directory\shell\RunCloseWindow\\=打开后关闭所在目录(多个)
        REGI $HKCR\Directory\shell\RunCloseWindow\\Icon=taskmgr.exe,0
        REGI $HKCR\Directory\shell\RunCloseWindow\command\\=%commandline%

dos时代菜鸟

窄口牛 发表于 2022-12-1 17:51
win7上无效。

open_with_close_window.7z (939 Bytes, 下载次数: 27)

2022-12-4 23:42 上传

点击文件名下载附件


需要事先 设定 已单独进程运行  ，win7 下可能需要注销一下，或者手动设置一下。


============================================

1. @echo off
   
2. setlocal ENABLEDELAYEDEXPANSION
   
3. 
   
4. set reg_cmd=""%~dpnx0" "%%1""
   
5. 
   
6. if  "%~1"=="" (
   
7.     SET /P ST=输入 A 添加右键菜单，输入 D 删除右键菜单：
   
8.     if /I "!ST: =!"=="a" call:Add
   
9.     if /I "!ST: =!"=="d" call:Remove
   
10.     pause
    
11.     goto :eof
    
12. )
    
13. 
    
14. call :exec "%~1"
    
15. goto :eof
    
16. 
    
17. :remove
    
18. echo remove
    
19. reg delete "HKEY_CLASSES_ROOT\*\shell\exec" /f
    
20. exit /b
    
21. 
    
22. :add
    
23. echo reg_add
    
24. echo.
    
25. echo exe
    
26. reg add "HKEY_CLASSES_ROOT\*\shell\EXEC" /ve /t REG_SZ /d "&打开当前文件并关闭浏览窗口" /f
    
27. reg add "HKEY_CLASSES_ROOT\*\shell\EXEC\command" /ve /t REG_SZ /d %reg_cmd% /f
    
28. rem 设置 单独进程 运行 explorer.exe / win7下需要手动设置 资源管理器选项,或者可能需要注销。
    
29. reg add "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced" /v SeparateProcess /t REG_DWORD /d 1 /f
    
30. exit /b
    
31. 
    
32. :exec
    
33. set "file_p=%~dp1"
    
34. set "file_p=!file_p:~0,-1!"
    
35. for %%c in ("!file_p!") do (set "windowtitle=%%~nxc")
    
36. if "!windowtitle!"=="" set "windowtitle=%~dp1"
    
37. 
    
38. for /f "delims=" %%c in ('tasklist /fi "imagename eq explorer.exe" /nh /fo:CSV /v') do (
    
39.     SET STR1=%%c
    
40.     set str1=!str1:","=/!
    
41.     set str1=!str1:"=/!
    
42.     for /f "tokens=2,9 delims=/" %%d in ("!str1!") do (
    
43.         for %%f in ("!windowtitle!" "!file_p!") do (
    
44.             if /i "%%~e"=="%%~f" (
    
45.                 echo %%d,%%e
    
46.                 taskkill /fi "pid eq %%d " /fi "imagename eq explorer.exe"
    
47.                 echo.
    
48.             )
    
49.    
    
50.         )
    
51.     )
    
52. )
    
53. 
    
54. start "" "%~1"
    
55. exit /b
    

复制代码

窄口牛

vbs的也来了
RunAndCloseFolder.rar (566 Bytes, 下载次数: 7)

2025-3-10 10:29 上传

点击文件名下载附件
▲

vaf

不明白

窄口牛

比如你要玩的游戏是绿版，没有快捷方式，不是要去目录运行吗？运行以后就应该关闭打开目录的资源管理器了，对哇？

lijia07

窄口牛 发表于 2022-11-14 16:51
比如你要玩的游戏是绿版，没有快捷方式，不是要去目录运行吗？运行以后就应该关闭打开目录的资源管理器了， ...

费这事为什么不发送个快捷方式到桌面？

窄口牛

桌面快捷方式太多了。

9zhmke

还可以写个文件夹右键功能，搜索运行里面与文件夹最可能匹配的EXE

窄口牛

那难度就大了，相当于智能启动菜单了。

9zhmke

窄口牛 发表于 2022-11-14 17:22
桌面快捷方式太多了。

放开始菜单里，列出目录来

旁观者清

有些情景会发疯的。比如一堆文档的文件名混乱的，要双击打开看是什么内容，再重命名。等等。

dos时代菜鸟

如何确定关闭的是 当前 explorer.exe 窗口进程？

dos时代菜鸟

从开始菜单的运行里面那个浏览按钮找要运行的程序吧

2010feicool

当你拥有几百上千个绿色游戏和软件的时候，就会知道win8.1的开始菜单有多妙了！

再配合开机自动生成快捷方式，爽极了……

窄口牛

我的不止这么多

2010feicool

DOSforever 发表于 2022-11-14 23:40
你这墙纸是啥，有没有原图或链接？

nttwqz

2010feicool 发表于 2022-11-14 21:39
当你拥有几百上千个绿色游戏和软件的时候，就会知道win8.1的开始菜单有多妙了！

再配合开机自动生成快捷 ...

个人觉得，8.1的开始屏幕是微软开始菜单设计的一个里程碑，10以后的就是一坨S，已经落后于UOS、Debian等开源操作系统的菜单设计。

hilsonma

nttwqz 发表于 2022-11-15 08:54
个人觉得，8.1的开始屏幕是微软开始菜单设计的一个里程碑，10以后的就是一坨S，已经落后于UOS、Debian等 ...

同感。
8.1的开始屏幕可以按使用频率、按名称、按类别去排列应用，还可以搜索应用，我常用的是按使用频率。
而10的开始菜单除了右边贴几个常用的应用，左边的菜单我都没怎么用过。

nttwqz

hilsonma 发表于 2022-11-15 10:39
同感。
8.1的开始屏幕可以按使用频率、按名称、按类别去排列应用，还可以搜索应用，我常用的是按使用频 ...

到了11，更加夸张，开始按钮都默认居中了，关键是居中后左边不管用，每次点还得瞄准，实现不了盲点，不知道意义何在，还得手动修改设置。

tt911

这没啥难度啊，用AHK编个脚本，多写判断一个热键就能满足两到三个功能需求。

窄口牛

文件的右键，关闭所在目录的资源管理器窗口。向你们求助，结果全是泼凉水。

dos时代菜鸟

窄口牛 发表于 2022-11-16 07:05
文件的右键，关闭所在目录的资源管理器窗口。向你们求助，结果全是泼凉水。

通过 pid 找出除第一个以外的所有进程关闭之。

a583091790

我用Q-dir收藏和备份了。

527104427

窄口牛 发表于 2022-11-14 16:51
比如你要玩的游戏是绿版，没有快捷方式，不是要去目录运行吗？运行以后就应该关闭打开目录的资源管理器了， ...

贡献几个由PECMD注册的右键：(保存为wcs，拖到pecmd上面即可拥有右键菜单)

        set^ EnviMode=1
        set^ ForceLocal=1

        //多开
        REGI $HKCR\*\shell\Locate\\=定位
        REGI $HKCR\*\shell\Locate\\Icon=explorer.exe,0
        REGI $HKCR\*\shell\Locate\Command\\=explorer.exe /n,/select,"%%1"
        REGI $HKCR\Directory\shell\Locate\\=定位
        REGI $HKCR\Directory\shell\Locate\\Icon=explorer.exe
        REGI $HKCR\Directory\shell\Locate\command\\=explorer.exe "%%1"

        //复制路径
        set commandline="%MyName%" team set^ EnviMode=1| set^ ForceLocal=1 | set$ nl=0d 0a| fdir --fullfile --long a="%%1"| fdir --fullfile --short b="%%1"| fdir --fullfile --volume c="%%1"| fdir --fullfile --part d="%%1"| fdrv e=%%%%d%%%%| sed -ex f=0,[^0-9], ,e| mstr * g,h=<1*>f| sed -ex i=1,\\Harddisk%%%%g%%%%Partition%%%%h%%%%\\,\\GLOBALROOT\\device\\harddisk%%%%g%%%%\\partition%%%%h%%%%\\,d| find *<>a, set< a=%%%%nl%%%%| find *<>b, set< b=%%%%nl%%%%| find *<>c, set< c=%%%%nl%%%%| find *<>d, set< d=%%%%nl%%%%| find *<>i, set< i=%%%%nl%%%%| set^ Clipboard=%%%%a%%%%%%%%b%%%%%%%%c%%%%%%%%d%%%%%%%%i%%%%
        REGI $HKCR\*\shell\CopyPaths\\=复制路径(多行)
        REGI $HKCR\*\shell\CopyPaths\\Icon=explorer.exe,0
        REGI $HKCR\*\shell\CopyPaths\Command\\=%commandline%
        REGI $HKCR\Directory\shell\CopyPaths\\=复制路径(多行)
        REGI $HKCR\Directory\shell\CopyPaths\\Icon=explorer.exe,0
        REGI $HKCR\Directory\shell\CopyPaths\command\\=%commandline%

        //结束进程
        set commandline="%MyName%" team set^ EnviMode=1| set^ ForceLocal=1| find --pid*@ a,| set b=%%1| lpos* * * ,*c=b,,a| ifex $%%%%c%%%%>0, forx *v c,d, team~ read -*,%%%%d%%%%,e,a~ mstr* * f=<1>e~ kill *force *%%%%f%%%%
        REGI $HKCR\*\shell\KillApps\\=结束进程(多个)
        REGI $HKCR\*\shell\KillApps\\Icon=taskmgr.exe,0
        REGI $HKCR\*\shell\KillApps\Command\\=%commandline%

        //关闭所在目录
        set commandline="%MyName%" team set^ EnviMode=1| set^ ForceLocal=1| set$ nl=0d 0a| fdir --full a="%%1"| mstr * -delims:\ b=<-1>a| find --class:CabinetWClass --wid@ c,%%%%b%%%%| find --class:CabinetWClass --wid@ d,%%%%a%%%%| set< c=%%%%nl%%%%%%%%d%%%%| forx *nl c,e, team~ mstr* * f=<2>e~ ifex $%%%%f%%%%>0, set @@postmsg=%%%%f%%%%;0x0010;0;0
        REGI $HKCR\*\shell\CloseWindow\\=关闭所在目录(多个)
        REGI $HKCR\*\shell\CloseWindow\\Icon=taskmgr.exe,0
        REGI $HKCR\*\shell\CloseWindow\Command\\=%commandline%
        REGI $HKCR\Directory\shell\CloseWindow\\=关闭所在目录(多个)
        REGI $HKCR\Directory\shell\CloseWindow\\Icon=taskmgr.exe,0
        REGI $HKCR\Directory\shell\CloseWindow\command\\=%commandline%

        //打开后关闭所在目录
        set commandline="%MyName%" team set^ EnviMode=1| set^ ForceLocal=1| set$ nl=0d 0a| exec $"%%1"| fdir --full a="%%1"| mstr * -delims:\ b=<-1>a| find --class:CabinetWClass --wid@ c,%%%%b%%%%| find --class:CabinetWClass --wid@ d,%%%%a%%%%| set< c=%%%%nl%%%%%%%%d%%%%| forx *nl c,e, team~ mstr* * f=<2>e~ ifex $%%%%f%%%%>0, set @@postmsg=%%%%f%%%%;0x0010;0;0
        REGI $HKCR\*\shell\RunCloseWindow\\=打开后关闭所在目录(多个)
        REGI $HKCR\*\shell\RunCloseWindow\\Icon=taskmgr.exe,0
        REGI $HKCR\*\shell\RunCloseWindow\Command\\=%commandline%
        REGI $HKCR\Directory\shell\RunCloseWindow\\=打开后关闭所在目录(多个)
        REGI $HKCR\Directory\shell\RunCloseWindow\\Icon=taskmgr.exe,0
        REGI $HKCR\Directory\shell\RunCloseWindow\command\\=%commandline%

窄口牛

527104427 发表于 2022-11-30 07:04
贡献几个由PECMD注册的右键：(保存为wcs，拖到pecmd上面即可拥有右键菜单)

        set^ EnviMode=1

我试试看。

窄口牛

9zhmke 发表于 2022-11-14 17:41
放开始菜单里，列出目录来

封装成品可以这么干，毕竟不会有多少软件，自己用就麻烦了，太多了。就是加个发送到开始菜单某分类的右键，然后去专门整理，估计也得整理一两天。

窄口牛

早年做网吧系统，自己预备的游戏，都是专门把游戏的最终执行文件改成中文，然后搜索exe，搞出来快捷方式还会有多余的，再整理，当然搞过一次，以后只改盘符就行了，游戏路径除了盘符有可能会变动，别的自然是不会变了。

窄口牛

未达到预期效果，打开东西没问题，关闭所在文件夹的资源管理器有问题，关闭不了。

527104427

窄口牛 发表于 2022-11-30 15:12
未达到预期效果，打开东西没问题，关闭所在文件夹的资源管理器有问题，关闭不了。

1.看一下你的PECMD版本号是多少
2.把 HKEY_CLASSES_ROOT\Directory\shell\RunCloseWindow\command 的值贴出来看一下
3.我在win7下测试是正常的

窄口牛

527104427

窄口牛 发表于 2022-11-30 17:52

看注册表的内容是正确的，那就只有换PECMD了，换最新的试试吧