はじめに

この投稿は、RPAツール「UiPath」での実装例について記事です。

UiPathのコミュニティ「UiPath Friends」が企画する「UiPathブログ発信チャレンジ2021サマー」の 23日目の投稿でもあります。

企画の内容は こちら 。カレンダーのURLは こちら です。

実行マシンの情報を取得するシリーズ

同様の内容で以下の投稿もあります。参考まで

ブラウザの情報が知りたいとき

UiPathでWeb操作を自動化する際に「どのブラウザで操作するか」を決めますが、

対象システムの推奨ブラウザに指定されているもの
自分との相性（好み、習熟度）

などで判断すると思います。

ただ、実行するマシンに「どのブラウザがインストールされているのか」をパッと知る方法がありません。
また、インストールされているバージョンが古くて「想定しないエラー」につながることもあります。

なので「インストールされているブラウザは何か？そのバージョンは何か」が分かると役に立つことがあります。

.NETで取得する

標準アクティビティで「インストールされたブラウザのバージョン情報を取得」アクティビティみたいなのがあれば良いのですが、現時点ではありません。

なので、以下に VB.NET で取得するコードを用意しました。（持ち出しやすいように、匿名変数型にしています）

func =
	Function() As Dictionary(Of String, Object)
		Dim dic As New Dictionary(Of String, Object)
		Dim browserKeys As RegistryKey = Registry.LocalMachine.OpenSubKey("SOFTWARE\WOW6432Node\Clients\StartMenuInternet")
		If browserKeys Is Nothing Then
			browserKeys = Registry.LocalMachine.OpenSubKey("SOFTWARE\Clients\StartMenuInternet")
		End If
		Dim browserNames As String() = browserKeys.GetSubKeyNames
		For Each bName As String In browserNames
			Dim browserKey As RegistryKey = browserKeys.OpenSubKey(bName)
			Dim browserKeyPath As RegistryKey = browserKey.OpenSubKey("shell\open\command")
			Dim browserName As String = browserKey.GetValue(Nothing).ToString
			Dim browserPath As String = browserKeyPath.GetValue(Nothing).ToString.Trim.Replace("""","")
			Dim browserVersion As String = System.Diagnostics.FileVersionInfo.GetVersionInfo(browserPath).FileVersion
			dic(browserName) = browserVersion
		Next
		Return dic
	End Function

これを、こんな感じのフローで実行すると

以下のように出力されます。

確認しやすいように、以下でxamlを公開しています。

終わりに

いかがでしたでしょうか？実装の参考になれば幸いです。

この記事が参考になったら、 LGTMをお願いします。閲覧ありがとうございました。