求助：基于DOSKEY的菜单代码在Windows10无法运行（Win11正常）

问题背景 #

基于DOSKEY实现的交互式菜单脚本在Windows11中可正常运行，但在Windows10下无法调出F7选择菜单，脚本用于组织日常运维工具的快捷选择。

问题根源 #

1. 窗口激活延迟不足：Windows10中CMD窗口响应速度慢于Win11，原脚本300ms等待时间无法确保窗口被正确激活，导致SendKeys按键无法被捕获。
2. 环境变量传递失效：子CMD进程无法完全继承父进程的option[]数组变量，导致JScript无法读取菜单选项填充DOSKEY历史。
3. DOSKEY历史填充逻辑不稳定：原脚本通过SendKeys逐行发送选项的方式，在Win10下易出现同步问题，导致历史未正确写入。

修复后的完整代码 #

@if (@CodeSection == @Batch) @then

@echo off

setlocal EnableDelayedExpansion
if "%~1" equ "newCmd" goto newCmd

rem 多选项交互式菜单 - 基于DOSKEY实现选择
rem 设置窗口标题用于激活定位
title Select option
rem 定义菜单选项
set numOpts=0

for %%a in ("计算器=calc" "记事本=notepad" "画图=mspaint" "资源管理器=explorer") do (
   for /F "tokens=1,2 delims==" %%b in (%%a) do (
      set /A numOpts+=1
      set "option[!numOpts!]=%%b"
      set "app[%%b]=%%c"
      rem 将选项写入临时文件，用于DOSKEY加载历史
      echo !option[!numOpts!]!>>"%temp%\menu_options.tmp"
   )
)

set /A numOpts+=1
set "option[!numOpts!]=退出"
echo !option[!numOpts!]!>>"%temp%\menu_options.tmp"

rem 菜单选择循环
:nextOpt

cmd /C "%~F0" newCmd
if errorlevel 1 goto nextOpt

rem 清理临时文件
del "%temp%\menu_options.tmp" >nul 2>&1
goto :EOF

:newCmd

rem 重置DOSKEY并从临时文件加载历史
doskey /REINSTALL
doskey /LISTFILE="%temp%\menu_options.tmp"

cls

echo 多选项交互式菜单

echo/
rem 发送F7键呼出选择菜单
cscript //nologo /E:JScript "%~F0"
rem 读取用户选择的选项
set /P "option=请选择所需选项: "

echo/

set "continue=1"
if defined app[%option%] (
   start !app[%option%]!
) else (
   set "continue=0"
)

exit %continue%

@end

var wshShell = WScript.CreateObject("WScript.Shell");

// 激活目标CMD窗口
wshShell.AppActivate("Select option");

// 延长等待时间适配Windows10的窗口响应速度
WScript.Sleep(800);

if (!WScript.Arguments.Length) {
   // 发送F7键打开DOSKEY历史选择菜单
   wshShell.SendKeys("{F7}");
}

关键修改说明 #

• 用临时文件替代环境变量传递：使用doskey /LISTFILE直接从临时文件加载历史菜单，彻底解决Win10下子进程环境变量继承失败的问题。
• 延长窗口激活等待时间：将等待时间调整为800ms，确保Windows10下CMD窗口完全就绪后再发送按键。
• 简化JScript逻辑：移除原脚本中读取环境变量的复杂代码，依赖DOSKEY原生文件加载功能，稳定性大幅提升。
• 本地化优化：将菜单选项和提示文本改为中文，更适配日常运维场景。

内容的提问来源于stack exchange，提问作者Doy Lyster