PowerShell检测浏览器是否安装的方法

小白龙

下面这方法检测不生效, 怎样解决?

1. $browsers = @("chrome.exe","firefox.exe","msedge.exe","iexplore.exe")
   
2. $installedBrowsers = @()
   
3. foreach ($browser in $browsers) {
   
4.     $paths = Get-Command $browser -ErrorAction SilentlyContinue
   
5.     if ($paths) { $installedBrowsers += $browser }
   
6. }
   
7. if ($installedBrowsers.Count -gt 0) { echo "已安装的浏览器有："; $installedBrowsers } else { echo "未检测到常见浏览器的安装。" }
   

复制代码

小白龙

用下面的方法解决了, 但是有更简单的吗?

1. # 定义浏览器在注册表中显示的名称
   
2. $registryNames = @("Google Chrome", "Mozilla Firefox", "Microsoft Edge", "Internet Explorer")
   
3. 
   
4. # 创建一个空数组，用于存放结果（包含名称和路径）
   
5. $installedBrowsers = @()
   
6. 
   
7. # 遍历两个主要的注册表位置（32位和64位程序）
   
8. $registryPaths = @(
   
9.     "HKLM:\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\*",
   
10.     "HKLM:\SOFTWARE\WOW6432Node\Microsoft\Windows\CurrentVersion\Uninstall\*"
    
11. )
    
12. 
    
13. # 获取所有已安装程序的信息
    
14. $installedPrograms = Get-ItemProperty $registryPaths -ErrorAction SilentlyContinue
    
15. 
    
16. # 检查每个目标浏览器是否在已安装程序列表中
    
17. foreach ($name in $registryNames) {
    
18.     # 找到匹配的程序项
    
19.     $program = $installedPrograms | Where-Object { $_.DisplayName -eq $name }
    
20.    
    
21.     if ($program) {
    
22.         # 将注册表名称映射回友好的名称和可执行文件名
    
23.         $browserInfo = switch ($name) {
    
24.             "Google Chrome" {
    
25.                 @{ Name = "Google Chrome"; Executable = "chrome.exe"; Path = $program.InstallLocation }
    
26.             }
    
27.             "Mozilla Firefox" {
    
28.                 @{ Name = "Mozilla Firefox"; Executable = "firefox.exe"; Path = $program.InstallLocation }
    
29.             }
    
30.             "Microsoft Edge" {
    
31.                 @{ Name = "Microsoft Edge"; Executable = "msedge.exe"; Path = $program.InstallLocation }
    
32.             }
    
33.             "Internet Explorer" {
    
34.                 # IE的路径比较特殊，通常在系统目录
    
35.                 @{ Name = "Internet Explorer"; Executable = "iexplore.exe"; Path = "$env:ProgramFiles\Internet Explorer" }
    
36.             }
    
37.         }
    
38.         # 将找到的浏览器信息添加到结果数组中
    
39.         $installedBrowsers += $browserInfo
    
40.     }
    
41. }
    
42. 
    
43. # 输出结果
    
44. if ($installedBrowsers.Count -gt 0) {
    
45.     Write-Host "已检测到以下浏览器及其安装路径：" -ForegroundColor Green
    
46.     # 遍历结果数组，格式化输出
    
47.     $installedBrowsers | ForEach-Object {
    
48.         # 检查路径是否存在，如果不存在则提示
    
49.         $pathStatus = if (Test-Path $_.Path) { " (存在)" } else { " (路径未找到)" }
    
50.         Write-Host "- $($_.Name): $($_.Path)$pathStatus"
    
51.     }
    
52. } else {
    
53.     Write-Host "未检测到常见浏览器的安装。" -ForegroundColor Yellow
    
54. }
    

复制代码