在 VBScript 中切换桌面合成

问题描述

如何在 VBScript 中打开/关闭桌面合成？也就是说，我想编写在关闭时打开桌面合成的代码，反之亦然。

我试过这个代码：

' Getting admin rights
If Not WScript.Arguments.Named.Exists("elevate") Then
  CreateObject("Shell.Application").ShellExecute WScript.FullName _,"""" & WScript.ScriptFullName & """ /elevate","","runas",1
  WScript.Quit
End If

'Stopping desktop composition
set WshShell = CREATEOBJECT("WScript.Shell")
WshShell.Run("net start UxSms"),0

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）