６行でズバリ！-iTunes COM SDKを利用してライブラリを吸い出すには-

タイトルはMSKKのあのページのパクリです。

Module Module1

    Sub Main()

        '///ToDo:iTunesLibを使用可能にするために、参照設定を行ってください。

1:      Dim app As iTunesLib.iTunesApp = New iTunesLib.iTunesAppClass
2:      Dim tracks As iTunesLib.IITTrackCollection = app.LibraryPlaylist.Tracks
3:      For i As Int16 = 1 To tracks.Count
4:          Dim track As iTunesLib.IITTrack = tracks(i)
5:          Console.WriteLine("{2}/{1}/{0}", track.Name, track.Artist, track.Album)
6:      Next

    End Sub

End Module

実行結果

ZARD/負けないで [SINGLE]/負けないで
ZARD/負けないで [SINGLE]/ストレイ・ラヴ
　　：
（以下続く）

すごい。これだけで曲リストが取れちゃう。
このデータをMSDEに突っ込んでASP.NETでライブラリ管理しちゃおうかな。