本篇文章给大家分享的是有关vbs中如何获取Am注册路径信息,小编觉得挺实用的,因此分享给大家学习,希望大家阅读完这篇文章后可以有所收获,话不多说,跟着小编一起来看看吧。Dim
本篇文章给大家分享的是有关vbs中如何获取Am注册路径信息,小编觉得挺实用的,因此分享给大家学习,希望大家阅读完这篇文章后可以有所收获,话不多说,跟着小编一起来看看吧。
Dim Wshshell, AMpath, Dllfile
Set WshShell = WScript.CreateObject("WScript.Shell")
call X86orX64()
MsgBox X86orX64
If X86orX64 = "x86" then
dllfile = WshShell.RegRead("HKEY_LOCAL_MacHINE\SOFTWARE\ActiveSoft\STKClient")
MsgBox Dllfile
Else
dllfile = WshShell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432node\ActiveSoft\STKClient")
MsgBox Dllfile
End If
Function X86orX64()
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_ComputerSystem",,48)
For Each objItem in colItems
If InStr(objItem.SystemType, "86") <> 0 Then
X86orX64 = "x86"
ElseIf InStr(objItem.SystemType, "64") <> 0 Then
X86orX64 = "x64"
Else
X86orX64 = objItem.SystemType
End If
Next
End Function
以上就是vbs中如何获取Am注册路径信息,小编相信有部分知识点可能是我们日常工作会见到或用到的。希望你能通过这篇文章学到更多知识。更多详情敬请关注编程网html频道。
--结束END--
本文标题: vbs中如何获取Am注册路径信息
本文链接: https://www.lsjlt.com/news/76022.html(转载时请注明来源链接)
有问题或投稿请发送至: 邮箱/279061341@qq.com QQ/279061341
下载Word文档到电脑,方便收藏和打印~
回答
回答
回答
回答
回答
回答
回答
回答
回答
回答
0