使用VBS脚本启用/禁用Chrome扩展遇回车操作失效问题求助

嘿，我明白你遇到的麻烦了——手动按回车能触发那个div#button按钮，但VBS脚本里的{ENTER}就是没反应，调延迟也没用对吧？别着急，咱们一步步来排查解决：

可能的原因&解决方案 #

• 确保Chrome窗口完全激活
  脚本里打开Chrome后，可能窗口还没真正获得焦点，导致SendKeys把回车发送到了其他窗口。试试在发送回车前先激活Chrome窗口：

  ' 等待页面加载完成后，激活Chrome窗口（标题要对应你的扩展页面，比如"扩展程序 - Google Chrome"）
  x.AppActivate "扩展程序 - Google Chrome"
  WScript.Sleep 500 ' 给窗口激活留一点时间
  

• 先确保按钮获得焦点
  有时候打开扩展页面后，默认焦点不在目标按钮上，直接发送回车自然没用。可以用{TAB}键切换焦点到按钮，次数根据页面实际元素调整：

  ' 按Tab几次，把焦点移到div#button上（比如按2次Tab，你可以手动数一下需要按几次）
  x.SendKeys "{TAB 2}"
  WScript.Sleep 300
  x.SendKeys "{ENTER}"
  

• 尝试用{SPACE}代替{ENTER}
  有些HTML元素（比如div模拟的按钮）对空格的响应和回车一样，试试替换成：

  x.SendKeys "{SPACE}"
  

• 延长页面加载等待时间
  虽然你试过调延迟，但可能还是不够——Chrome加载扩展页面有时候需要一点时间，尤其是浏览器刚启动的时候。把启动后的延迟拉长到4-5秒试试：

  shell.Open "C:\Users\steve.newton\Desktop\Google Chrome.lnk"
  WScript.Sleep 5000 ' 给Chrome足够时间加载扩展页面
  

修改后的完整脚本示例 #

Dim shell, x
Set shell = wscript.CreateObject("Shell.Application")
Set x = CreateObject("Wscript.shell")

' 打开Chrome浏览器
shell.Open "C:\Users\steve.newton\Desktop\Google Chrome.lnk"
' 等待浏览器启动并加载扩展页面（这里假设你会自动导航到chrome://extensions/）
WScript.Sleep 5000

' 激活Chrome扩展页面窗口
x.AppActivate "扩展程序 - Google Chrome"
WScript.Sleep 500

' 切换焦点到目标按钮
x.SendKeys "{TAB 2}" ' 根据实际情况调整Tab次数
WScript.Sleep 300

' 触发按钮（用回车或空格都可以试试）
x.SendKeys "{ENTER}"
' x.SendKeys "{SPACE}"

Set x = Nothing
Set shell = Nothing

这里的关键是确保窗口激活和按钮获得焦点，因为VBS的SendKeys是全局发送的，必须保证输入的目标窗口和元素是当前活跃的。如果还是不行，你可以手动打开扩展页面，数一下从页面加载完成到按几次Tab能聚焦到那个按钮，对应调整脚本里的{TAB n}次数。

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