internet-explorer - 有没有更优雅的方式来使用 AutoIt 获取 Internet Explorer 版本
问题描述
概括:
我正在寻找一种更优雅的方式来在 Windows 计算机上获取 Internet Explorer ( IE ) 版本(尤其是使用 AutoIt,因为已编译 *.exe)。我当前的解决方案(如下所示)可以完成这项工作,但也许有更好的方法使用纯 AutoIt 函数(UDF)?
背景和目标:
我必须检查特定的IE版本,通常是低于 11 (11.0.9600) 的版本。
我必须检查大约 60 台设备(服务器、笔记本电脑等)。编译后的 *.exe 将找到版本并将该信息的条目(除了主机名等其他信息)设置为一个小的 HTML 报告。远程处理和执行不是问题。
代码:
#include-once
#include <Array.au3>
Func _getFileProperties( $sDirectory, $sFileName, $bRemoveEmptyLines = True )
Local $oShellApp = ObjCreate( 'Shell.Application' )
Local $oFolder = $oShellApp.NameSpace( $sDirectory )
Local $oFolderItem = $oFolder.Parsename( $sFileName )
Local $aPropertyList[1][2] = [[1]]
For $i = 0 To 400 Step 1
If $oFolder.GetDetailsOf( $oFolder.Items, $i ) Then
ReDim $aPropertyList[$aPropertyList[0][0] + 1][2]
$aPropertyList[$aPropertyList[0][0]][0] = $oFolder.GetDetailsOf( $oFolder.Items, $i )
$aPropertyList[$aPropertyList[0][0]][1] = $oFolder.GetDetailsOf( $oFolderItem, $i )
$aPropertyList[0][0] += 1
EndIf
Next
_ArraySort( $aPropertyList, 0, 1, 0 )
If $bRemoveEmptyLines Then
For $i = $aPropertyList[0][0] - 1 To 1 Step - 1
If $aPropertyList[$i][1] == '' Then _ArrayDelete( $aPropertyList, $i )
Next
EndIf
$aPropertyList[0][0] = UBound( $aPropertyList, 1 ) - 1
Return $aPropertyList
EndFunc
Global $aPropertyList = _getFileProperties( @SystemDir, 'ieframe.dll' )
_ArrayDisplay( $aPropertyList )
当前结果:
当然,我会根据我的搜索条件过滤数组(没问题)。
预期结果:
与上述(当前结果)基本相同,但可能以更快的方式并且还具有 AutoIt 自己/本机功能?因为这只是将收集的许多其他信息的一个步骤,所以我尝试减少代码并提高未来编辑的可读性。
请注意,我可以检查_getFileProperties( @SystemDir, 'ieframe.dll' )
或_getFileProperties( $sPathIe, 'iexplore.exe' )
。
两者都提供版本信息。
有没有其他方式,更优雅和 AutoIt 自己/本机功能来实现我的目标?
解决方案
您也可以尝试检查注册表详细信息以验证 IE 版本。希望这可以帮助您以其他方式找到它。
;Internet Explorer version is
Global $svcVersion = (RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Internet Explorer", "svcVersion"))
If $svcVersion <> "" Then
MsgBox(1, "internet Explorer Version" , "Internet Explorer version is: " & $svcVersion)
Endif
或者
;Internet Explorer updated version is
Global $svcUpdateVersion = (RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Internet Explorer", "svcUpdateVersion"))
If $svcUpdateVersion <> "" Then
MsgBox(1, "internet Explorer Version" , "Internet Explorer updated version is: " & $svcUpdateVersion)
Endif
推荐阅读
- configuration - 使用 Apache MINA 实现 JGIT TransportConfigCallback
- haproxy - HAProxy ACL 与文件中的用户代理不匹配
- sql - PostgreSQL 条件连接的性能 - 查询优化
- html - 如何使文本区域中的文本开始略低?
- reactjs - SPFx ListView 控件-“defaultSelection”不起作用
- php - 如何通过 WP CLI 取消 WP All Import?
- discord - 当事件发生在 Discord、OBS 更新中的浏览器源时,如何做到这一点?
- reactjs - How do I properly set up my useEffect so I don't receive a missing dependency warning?
- python - 如何在 Python (< 3.10) 中使用不同数量的参数注释相互依赖的函数参数和返回类型?
- javascript - 在 ReactJS 中实现简单的 Google oAuth