人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

Windows7のエクスプローラで動画ファイルを表示すると、「長さ」という列に動画の再生時間が表示されます。この「長さ」の値をスクリプトで取得する方法があれば教えてください。

お願いしている立場ですので言語は何でも構いませんが、vbscrpit / PowerShell / rubyなら嬉しいです。

●質問者: teraco
●カテゴリ:コンピュータ
✍キーワード:PowerShell Ruby windows7 エクスプローラ スクリプト
○ 状態 :終了
└ 回答数 : 1/1件

▽最新の回答へ

1 ● cx20
ベストアンサー

エクスプローラで表示される拡張情報は、Shell オブジェクトの ExtendedProperty() にて取得可能です。


ExtendedProperty は、「プロパティ名」を指定するか「SCID という形式」(「Format ID (FMTID)」と「Property ID (PID)」の組み合わせ)で指定します。


以下は、VBScript でのサンプルです。

' File : ShowExtendedProperty.vbs
' Usage : CScript //Nologo ShowExtendedProperty.vbs
' Description : VBScript から Shell.Application を使用してファイル拡張情報を表示するサンプル

Option Explicit

Const FMTID_AudioSummaryInformation = "{64440490-4C8B-11D1-8B70-080036B11A03}"

Call Main()

Sub Main()
 Dim strFilePath
 strFilePath = "C:\Users\Public\Videos\Sample Videos"
 Call ShowExtendedProperty( strFilePath )
End Sub

Sub ShowExtendedProperty( strFilePath )
 Dim objShell
 Set objShell = CreateObject("Shell.Application")

 Dim objFolder
 Set objFolder = objShell.Namespace(strFilePath)

 Dim objItem
 For Each objItem In objFolder.Items
 WScript.Echo "FileName : [" & objItem.Name & "]"
 WScript.Echo "Duration : [" & CStr(objItem.ExtendedProperty("Duration")) & "]" ' 単位は 100ns
 WScript.Echo "FMTID_AudioSummaryInformation,3 : [" & CStr(objItem.ExtendedProperty(FMTID_AudioSummaryInformation & " 3") ) & "]" ' 単位は 100ns
 Next
End Sub

実行結果

FileName : [野生動物.wmv]
Duration : [300930000]
FMTID_AudioSummaryInformation,3 : [300930000]

参考情報

■ ShellFolderItem.ExtendedProperty Method

http://msdn.microsoft.com/en-us/library/bb774055.aspx

■ System.Media.Duration (Windows)

http://msdn.microsoft.com/en-us/library/bb787399.aspx

■ ファイルの作成者情報を取得する方法(VB6.0)

http://hanatyan.sakura.ne.jp/patio/read.cgi?no=59

■ BlueLeaf1336-PROBLEMS-2006_0021 > DelphiでShellオブジェクトを使う > ShellFolderItem.ExtendedProperty(1)

http://www.geocities.jp/fjtkt/problems/2006_0021.html

◎質問者からの返答

提示された方法でばっちりでした!ありがとうございました!

※ ポイント付き質問にするの忘れたのでポイント送ります。

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ