高级系统设置,现在还有问题不会发送空格键
2019-8-6 乱云飞 评论(0) 浏览(854) 标签: VBS 系统设置 控制面板
dim Shell
Set Shell = WScript.CreateObject("WScript.Shell")
Shell.Run"rundll32.exe shell32.dll,Control_RunDLL sysdm.cpl,,3"
'Shell.Run"cmd.exe /c rundll32.exe shell32.dll,Control_RunDLL sysdm.cpl,,3",0
WScript.Sleep 1000
Shell.AppActivate "系统属性"
Shell.SendKeys " "