|
本帖最后由 wenbieba 于 2024-11-5 12:16 编辑
隔壁坛子里的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
|
|