(WSH)VBScriptでバイナリファイルのバージョンを取得したい

当初バッチファイルでバイナリファイル(exeとかdllとか)のバージョンを取得しようと思ってましたが、別途ツールをいけないらしく結構面倒そうでした。
(とりあえず,@IT:バイナリ・ファイルのバージョンを調べるコンピュータ系blog:バイナリファイルのバージョンを調べる方法が参考になります)

VBScriptだったら簡単に取得できるようでした。
参考先まるままですが、以下のコードで取得できるようです。

dim path
path="C:\Program Files\JUJO\HardKey EG Pro\FlashCtl.dll"
MsgBox GetVersion(path)
 
Function GetVersion(pathspec)
Dim fso, temp
Set fso = CreateObject("Scripting.FileSystemObject")
temp = fso.GetFileVersion(pathspec)
If Len(temp) Then
GetVersion = temp
Else
GetVersion = "バージョン情報はありません。"
End If
End Function


参考:
VBScriptでファイルのバージョン情報を取得するには - aspxの日記2009
[PR]
by Jehoshaphat | 2013-03-21 22:16 | VBScirpt,WSH,バッチ | Trackback | Comments(0)
トラックバックURL : http://jehupc.exblog.jp/tb/19944133
トラックバックする(会員専用) [ヘルプ]
※このブログはトラックバック承認制を適用しています。 ブログの持ち主が承認するまでトラックバックは表示されません。


<< (バッチ)ファイルフォルダの存在確認 Javaランタイム(JRE)を... >>