wmi设置笔记本屏幕背景灯光亮度 Vista以上系统纯源码无api

xhxx123 · 发表于 2019-11-2 21:46:59

wmi是微软开发的系统远程操控功能
所谓的135端口入侵就跟这个息息相关啦

本次研究的文档docs.microsoft.com/en-us/windows/win32/wmicoreprov/wmisetbrightness-method-in-class-wmimonitorbrightnessmethods

wmi设置笔记本屏幕背景灯光亮度
Vista以上系统纯源码无api

我研究了几天  的成果

收下源码不留言的天杀

连精益模块调用wmi都需要什么com调用() 这个可是纯源码

vbs脚本操作wmi对象的时候，有两种方法winmgmts:\\ 和 WbemScripting.SWBemlocator

遇到[backcolor=rgba(0, 0, 0, 0.04)]winmgmts:\\直接拆解就行  遇到{}不管都是权限之类的拆解出命名空间\root\CIMV2等等的然后就是类名 xxx
就可以调用了

微软文档说通过wmi 还可以监控磁盘文件变动  可以去试试

变量名	类型	静态	数组	备注
i	整数型			循环递增值
o	对象			循环赋值一次性调用对象
WbemServices	对象			wmi连接对象
WmiMonitorBrightnessMethods_数组	对象			对象枚举集合
objOutParams	对象			返回参数
InParameters	对象			传递参数
className	文本型			微软文档功能_对象名字

' 创建WMI对象
d.创建 (“WbemScripting.SWbemLocator”, )
' objWbemLocator.对象型方法 (“ConnectServer”, 参_计算机名, “\root\CIMV2”, 参_用户名, 参_密码, , , , )  ' 连接远程服务器
' 连接wmi服务  可以设置远程  (.为本地)  命名空间为root/wmi  命名空间可以说跟文件夹类似不懂的打个比喻就明白了
WbemServices ＝ d.对象型方法 (“ConnectServer”, “.”, “root/wmi”, , , , , , )
' 在微软wmi文档中查到的屏幕设备类名
className ＝ “WmiMonitorBrightnessMethods”
' ''''''''''''''''''重要环节'''''''''''''''''''''''''''
' 分析该对象的方法参数名 + 数量这个对象不能调用调用会报错就是被Get坑一天但是可以显示所有
输出调试文本 (WbemServices.对象型方法 (“Get”, className).文本方法 (“GetObjectText_”, ))  ' by:LingMax
' 枚举该对象  获取所有可以操控的对象
WmiMonitorBrightnessMethods_数组＝ WbemServices.对象型方法 (“InstancesOf”, className)
' 循环一个一个来

计次循环首 (WmiMonitorBrightnessMethods_数组.读数值属性 (“Count”, ), i)

' 从枚举数据中取出本次操作的对象从0开始

o ＝ WmiMonitorBrightnessMethods_数组.对象型方法 (“ItemIndex”, i － 1)

' 取出接口的参数对象为什么这么长? 微软文档上就是这么写的

InParameters ＝ o.读对象型属性 (“Methods_”, ).对象型方法 (“Item”, “WmiSetBrightness”).读对象型属性 (“InParameters”, ).读对象型属性 (“SpawnInstance_”, )

如果真 (InParameters.是否为空 () ＝真)

输出调试文本 (“InParameters: 获取参数对象失败”)

' 设置调用传递的参数 Properties_ Value 是固定的微软文档上就是这样写的

InParameters.读对象型属性 (“Properties_”, ).对象型方法 (“Item”, “Timeout”).写属性 (“Value”, 10) ' 参数 Timeout 类型 uint32

InParameters.读对象型属性 (“Properties_”, ).对象型方法 (“Item”, “Brightness”).写属性 (“Value”, 10) ' 参数 Brightness 类型 uint8

输出调试文本 (“传递的参数预览”, InParameters.文本方法 (“GetObjectText_”, ))

' 调用功能

objOutParams ＝ o.对象型方法 (“ExecMethod_”, “WmiSetBrightness”, InParameters)

如果 (o.取错误 () ＝ “”)

输出调试文本 (“调用成功”)

输出调试文本 (“调用失败:傻逼了吧”)

输出调试文本 (objOutParams.是否为空 (), objOutParams.文本方法 (“GetObjectText_”, ), o.读对象型属性 (“Path_”, ).读文本属性 (“Path”, ), InParameters.取错误 (), o.取错误 ())

' o.查看 ()

计次循环尾 ()
结束 ()

.版本 2<br />
.局部变量 i, 整数型, , , 循环递增值<br />
.局部变量 o, 对象, , , 循环赋值 一次性调用对象<br />
.局部变量 WbemServices, 对象, , , wmi连接对象<br />
.局部变量 WmiMonitorBrightnessMethods_数组, 对象, , , 对象枚举集合<br />
.局部变量 objOutParams, 对象, , , 返回参数<br />
.局部变量 InParameters, 对象, , , 传递参数<br />
.局部变量 className, 文本型, , , 微软文档 功能_对象名字<br />
' 创建WMI对象<br />
d.创建 (“WbemScripting.SWbemLocator”, )<br />
'objWbemLocator.对象型方法 (“ConnectServer”, 参_计算机名, “\root\CIMV2”, 参_用户名, 参_密码, , , , )  ' 连接远程服务器<br />
' 连接wmi服务  可以设置远程  (.为本地)  命名空间为root/wmi  命名空间可以说跟文件夹类似 不懂的打个比喻就明白了<br />
WbemServices ＝ d.对象型方法 (“ConnectServer”, “.”, “root/wmi”, , , , , , )<br />
' 在微软wmi文档中查到的 屏幕设备类名<br />
className ＝ “WmiMonitorBrightnessMethods”<br />
' ''''''''''''''''''重要环节'''''''''''''''''''''''''''<br />
' 分析该对象的方法 参数名 + 数量   这个对象不能调用 调用会报错 就是被Get坑一天 但是可以显示所有<br />
输出调试文本 (WbemServices.对象型方法 (“Get”, className).文本方法 (“GetObjectText_”, ))  ' by:LingMax<br />
' 枚举该对象  获取所有可以操控的对象<br />
WmiMonitorBrightnessMethods_数组 ＝ WbemServices.对象型方法 (“InstancesOf”, className)<br />
' 循环 一个一个来<br />
.计次循环首 (WmiMonitorBrightnessMethods_数组.读数值属性 (“Count”, ), i)<br />
    ' 从枚举数据中  取出本次操作的对象 从0开始<br />
    o ＝ WmiMonitorBrightnessMethods_数组.对象型方法 (“ItemIndex”, i － 1)<br />
    ' 取出接口的参数 对象  为什么这么长? 微软文档上就是这么写的<br />
    InParameters ＝ o.读对象型属性 (“Methods_”, ).对象型方法 (“Item”, “WmiSetBrightness”).读对象型属性 (“InParameters”, ).读对象型属性 (“SpawnInstance_”, )<br />
    .如果真 (InParameters.是否为空 () ＝ 真)<br />
        输出调试文本 (“InParameters: 获取参数对象失败”)<br />
    .如果真结束<br />
    ' 设置调用传递的参数 Properties_  Value  是固定的 微软文档上就是这样写的<br />
    InParameters.读对象型属性 (“Properties_”, ).对象型方法 (“Item”, “Timeout”).写属性 (“Value”, 10)  ' 参数 Timeout 类型 uint32<br />
    InParameters.读对象型属性 (“Properties_”, ).对象型方法 (“Item”, “Brightness”).写属性 (“Value”, 10)  ' 参数 Brightness 类型 uint8<br />
    输出调试文本 (“传递的参数 预览”, InParameters.文本方法 (“GetObjectText_”, ))<br />
    ' 调用功能<br />
    objOutParams ＝ o.对象型方法 (“ExecMethod_”, “WmiSetBrightness”, InParameters)<br />
    .如果 (o.取错误 () ＝ “”)<br />
        输出调试文本 (“调用成功”)<br />
    .否则<br />
        输出调试文本 (“调用失败:傻逼了吧”)<br />
    .如果结束<br />
    输出调试文本 (objOutParams.是否为空 (), objOutParams.文本方法 (“GetObjectText_”, ), o.读对象型属性 (“Path_”, ).读文本属性 (“Path”, ), InParameters.取错误 (), o.取错误 ())<br />
    ' o.查看 ()<br />
.计次循环尾 ()<br />
结束 ()