阿里云监控大盘+VBS脚本实现自动页面切换

一、前言

  需求是这样的，企业阿里云中业务块很多，想到同时监控到所有数据，链接到电视大屏展示。但是阿里云云监控大盘，是以网页显示的，而且不同的业务很难在一个页面展示，那么想到同时展示多方面数据怎么办？

  这个时候想到用iframe做一个静态页面把多个阿里云监控大盘放进去。可是页面找开发的做好了，可是阿里云的安全机制，导致第三方页面根本无法登录账号。这个方案不可用。

  在想其他方案，如果是网页展示，那么有没有按键精灵类似的脚本可以自动刷新页面呢。下载了按键精灵，研究一番放弃了，太复杂，太难用了。

  最终选择用vbs脚本来实现这个功能。同理，如果我们打开多个浏览器页面，那么我们按ctrl+tab键可以实现页面切换。

二、实施

首先登录阿里云，用主账号创建RAM账号，并授予阿里云监控相关权限。为了安全考虑，毕竟阿里云上的业务太多了，这个展示电脑肯定是放在电视机大屏边上的，任何人都可以操作。安全第一。创建监控大盘，我用的是里面的现有模板，很漂亮，会折腾的可以自定义，我研究了一番放弃了，做出来的又丑又难看。创建自己的需要监控的相关大盘。

 

 

 

打开所有页面后，我用的360极速浏览器，设置内可以全屏展示。 

这个时候就要选用vbs脚本了。

参考：https://blog.csdn.net/qq_38254897/article/details/121975078

 创建TXT文件，保存内容后，更改后缀vbs

自动刷新ctrl+tab无限循环。^{TAB}的意思就是ctrl+tab。3000=1秒，我这用的10秒钟切换一下页面。

Set objShell = CreateObject("Wscript.Shell") 
do
WScript.Sleep 15000
objShell.SendKeys "^{TAB}"               
WScript.Sleep 15000
objShell.SendKeys "^{TAB}"  
loop

终止所有vbs进程，在做一个终止的脚本。不然根本停不下来。

Dim objShell
set objShell= wscript.createobject("wscript.shell") 
objShell.run "taskkill /im wscript.exe /f ",0 ,true
 

 创建好后，放在监控主机的桌面上，双击运行。结合网页全屏展示，完美。