win11任务栏全部显示

wenbieba

隔壁坛子里的win11任务栏显示
https://bbs.pcbeta.com/viewthread-2018591-2-1.html
作者说可更改路径，但把Tools改换后会报错“找不到扩展”不改路径正常。
麻烦大神看看什么原因导致。
附上作者代码：
两个文件解决1  一个批处理 用于添加计划任务（用户登录后，1分钟刷新一次）
1 个vbs文件用于显示任务栏图标


批处理和vbs，放同一目录

批处理如下
@ECHO off
PUSHD %~DP0
>NUL 2>&1 REG.exe query "HKU\S-1-5-19" || (
ECHO SET UAC = CreateObject^("Shell.Application"^) > "%TEMP%\Getadmin.vbs"
ECHO UAC.ShellExecute "%~f0", "%1", "", "runas", 1 >> "%TEMP%\Getadmin.vbs"
"%TEMP%\Getadmin.vbs"
DEL /f /q "%TEMP%\Getadmin.vbs" 2>NUL
Exit /b
)

rem 始终显示任务栏图标,0不隐藏, 1隐藏
Reg.exe add "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer" /v "EnableAutoTray" /t REG_DWORD /d "0" /f
REM 通知区域始终显示所有图标,1显示隐藏的图标菜单，0是隐藏隐藏图标菜单。该项和win10设置变化较大
Reg.exe add "HKCU\Software\Classes\Local Settings\Software\Microsoft\Windows\CurrentVersion\TrayNotify" /v "SystemTrayChevronVisibility" /t REG_DWORD /d "1" /f
REM 任务栏合并（0：始终；1：占满后隐藏；2：从不合并）
Reg.exe add "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced" /v "TaskbarGlomLevel" /t REG_DWORD /d "0" /f
rem 添加计划任务
SCHTASKS /CREATE /SC onlogon /TN "Win11显示任务栏所有图标" /TR "'C:\Windows\System32\wscript.exe' %~DP0ShowAllTrayIcons.vbs" /RU Users /NP /F
SCHTASKS /change /tn "Win11显示任务栏所有图标" /ri 1


VBS如下
HKCU = &H80000001
key = "Control Panel\NotifyIconSettings"
Set reg = GetObject("winmgmts://./root/default:StdRegProv")
If reg.EnumKey(HKCU, key, names) = 0 Then
        If Not IsNull(names) Then
                For Each name In names
                        reg.SetDWORDValue HKCU, key + "\" + name, "IsPromoted", 1
                Next
        End If
End If

Fww5201314

谢谢分享

wenbieba

Fww5201314 发表于 2024-11-5 12:13
谢谢分享

能把它破掉吗

hone728

就是没win10好用啊。。。

reninhouse

看着不错哦

wenbieba

Fww5201314 发表于 2024-11-5 12:13
谢谢分享

不能改路径，改了就报错

qq8899399

同学。 我从PCBETA。追过来。你那边回复我一下啊。我自己本机测试。 任意改路径都没问题啊  

你有没有出错截图。

guong

感谢分享~

win98se

感谢分享

2012andyle113

不跟进了，没什么真正的改进，用哪个都一样

GXNNYWF

感谢分享

wangyibin

你是不是直接打开的bat文件 而不是exe文件 要不解压出来后再运行bat文件 这时bat和vbs会在一个文件夹内。

wwwlhp

多谢分享！！！