两句代码实现win10一秒钟横竖屏切换

自己的win8平板重装系统升级成了win10，原来挺爽的自动切换横竖屏功能因为驱动的问题只好手动了。
在之前的预览版中，通知中心的磁贴中还有快捷方式，现在想切换横竖屏真麻烦，进入通知中心，所有设置，系统，显示，方向，切换，再确定。。。
现在有一个一键切换横竖屏的办法
创建两个txt文本文件，将后缀.txt改为.vbs
第一个文本 文件名：横屏 复制下面的代码
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.SendKeys "^%{UP}"
同样，第二个 文件名：竖屏 复制下面的代码
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.SendKeys "^%{LEFT}"
保存。ok

点击运行 ，完美解决
然后更改下图标，美化一下，如一楼所示
原理：这是创建了两个windows 脚本
执行 Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.SendKeys "^%{UP}"
相当于按了 ctrl+alt+方向键（这就是win10中切换横竖屏的快捷键） ^%{UP} 与之相对应
同理竖屏
不可以固定到开始屏幕是个大遗憾。。。。。