Dim obj,tempValue
’获得窗体对象
set obj = Browser(\"CreationTime:=1\").Page(\"index:=\").Object.parentWindow
’获取浏览器的当前语言。
tempValue = obj.clientInformation.browserLanguage
print(tempValue)
’获取浏览器的名称。
tempValue = obj.clientInformation.appName
print(tempValue)
’获取浏览器运行的平台和版本。
tempValue = obj.clientInformation.appVersion
print(tempValue)
’获取用户的操作系统名称。
tempValue = obj.clientInformation.platform
print(tempValue)
’获取操作系统适用的默认语言。
tempValue = obj.clientInformation.systemLanguage
print(tempValue)
’获取浏览器的代码名称。
tempValue = obj.clientInformation.appCodeName
print(tempValue)
’获取指示 CPU 等级的字符串。
tempValue = obj.clientInformation.cpuClass
print(tempValue)
’获取表明系统是否处于全局脱机模式的值。
tempValue = obj.clientInformation.onLine
print(tempValue)
’获取等同于 HTTP 用户代理请求头的字符串。
tempValue = obj.clientInformation.userAgent
print(tempValue)
延伸阅读
文章来源于领测软件测试网 https://www.ltesting.net/