[问题求助] [已解决]求助修改vbs代码关闭迅雷软件的弹窗窗口

ygqiang

[已解决]vbs如何修改，才能关闭迅雷软件的弹窗窗口？

Do
  Main
  WScript.Sleep 2000
Loop

Sub Main()

wndws = array("迅雷下载宝")
set Thunder = createobject("wscript.shell")
  for each wndw in wndws
    while Thunder.appactivate(wndw)
      wscript.sleep 1000
      qq.sendkeys "%{f4}"
      wscript.sleep 1000
    wend
  next
  wscript.sleep 1000
  
End Sub
复制代码

codegay

你需要的是这个
https://www.zhihu.com/question/24265718/answer/27226434

LJY4.0

回复 1# ygqiang
添加语句:set qq = createobject("wscript.shell")