脚本实现自动打开网页全屏

需求：

为机关单位一键全屏打开页面

Set s = CreateObject("WScript.Shell")
s.Run"""C:\Users\86151\AppData\Local\Google\Chrome\Application\chrome.exe""" & "url"
WScript.Sleep 1000
s.SendKeys "{F11}"