[リストへもどる]   [VBレスキュー(花ちゃん)]
一括表示

投稿時間:2004/10/10(Sun) 08:21
投稿者名:P・ウラヤス
Eメール:
URL :http://hotsex1.com/
タイトル:
メタファイルからの情報取得について
はじめまして。
メタファイルからの情報取得についてアドバイスをお願いします。

<ASX VERSION="3.0">

    <Entry>
        <PARAM NAME="Author" VALUE="アーティストA"/>
        <PARAM NAME="Album" VALUE="アルバムA"/>
        <PARAM NAME="Title" VALUE="曲A"/>
        <Ref href="C:\・・・\・・・\・・.wma"/>
    </Entry>
    ・
    ・
</ASX>
という内容のメタファイル Test.wax から

Private Sub ListView1_ItemClick(ByVal Item As MSComctlLib.ListItem)
    ・
    ・
    With WMP1
    ・
    For i = 1 To pCNT
       Set ItemX = ListView2.ListItems.Add(i)
       ItemX.Text = .currentPlaylist.Item(i - 1).getItemInfo("Author")
               ItemX.SubItems(1) = .currentPlaylist.Item(i - 1).getItemInfo("Album")
               ItemX.SubItems(2) = .currentPlaylist.Item(i - 1).getItemInfo("Title")
    Next i
    ・
    End With
    ・
End Sub
上記のコードにおいて、
アーティスト名・タイトル名・アルバム名を取得しようとしています。
アルバム名・タイトルなどは取得できるのですが、アーティスト名を取得できません。

尚、Windows Media Player の PlayList(*****.wpl)の場合は、取得できます。
よろしくお願いします。

環境:
    WindowsXP pro
    VB 6.0 sp6
    Windows Media Player 9.0
よろしくお願いします。