vbs 获取杀毒软件信息（deviceconfigmanager.vbs 查杀工具）

以下是一个使用VBS获取杀毒软件信息的示例代码:
```vbs
' 定义要查询的杀毒软件名称和版本号
str杀毒软件 = \"瑞星杀毒软件2019版\"
str版本号 = \"18.03\"
' 使用搜索引擎查询杀毒软件信息
Dim searchStr As String
Dim result As String
Dim 关键词 As String
Dim i As Integer
Dim j As Integer
Dim key As String
' 设置搜索引擎和查询字符串
Set searchStr = \"http://www.rising.com.cn/\"
关键词 = \"杀毒软件\"
' 循环查询每个搜索结果
i = 0
j = 0
For Each result In searchStr.split(\"&\")
' 获取搜索结果的标题
key = result(j)
' 获取搜索结果的标题和内容
result = result(0)
' 判断搜索结果是否为杀毒软件信息
If InStr(1, result, \"瑞星杀毒软件\") > 0 Then
' 设置当前搜索结果的计数器
i = i 1
' 获取搜索结果的关键字
key = InStr(1, result, \"关键字\")
' 获取搜索结果的版本号
version = InStr(1, result, \"版本号\")
' 输出结果
MsgBox \"搜索结果:\" & key & \" \" & result & \" \" & version
End If
Next result
```
该代码使用瑞星杀毒软件的官方网站作为查询搜索引擎,并获取杀毒软件的名称和版本号。您可以根据需要进行修改和调整。