网站学习每十分钟弹出一个确定窗口，让电脑自己点确定

求助：网站学习每十分钟弹出一个确定窗口，让电脑自己点确定。
我在一个网站学习的时候，每隔十分钟该网站弹出一个确定窗口，只有点击了，才计入学时，如果不点，以前的也全部清零。求 大侠给个代码，让电脑自己点确定。
------解决方案--------------------

dim shell

set shell = createobject("wscript.shell")


do while true

    if shell.appactivate("弹出对话框的标题") then

        call shell.sendkeys("{enter}")

    end if

    call wscript.sleep(1000)

loop