[_seym.]

hi. ich wollt mir mal selber ein programm in VB6 schreiben, das mir meine iTunes library durchscannt und in jeder mp3 ein albumcover und nen songtext abspeichert. soweit ja eigentlich nix großes.
bei mir scheiterts aber schon am anfang. jedesmal wenn ich versuche itunes als objekt zu instanzieren stürzt mir VB6 ab! hier mein code:

  Dim oiTunes As New iTunesApp
  Dim oTracks As IITTrackCollection
  Dim i As Long
  
  oTracks = oiTunes.LibraryPlaylist.Tracks
  
  For i = 1 To oTracks.Count
	List1.AddItem oTracks.Item(i).Name
  Next i

natürlich hab ich vorher einen verweis auf die "iTunes 1.7 TypeLibrary" gesetzt.
bin für jegliche art von vorschlägen offen! ^^
danke schonmal im vorraus.

mfg,
_seym.

[_seym.]

so. mittlerweile hab ich mein prob selber gelöst

aber danke für die views!

mfg,
_seym.

[_seym.]

an mir ^^
ich hab seit langem mal wieder was in vb gemacht, und hatte bis dahin schon den größten teil der syntax vergessen.

Dim oiTunes As New iTunesApp, I As Long
Dim oT As IITTrackCollection

Set oT = oiTunes.LibrarySource.Playlists(lplIndex).Tracks 'lplIndex is die playlistID von iTunes

For I = 1 To oT.Count
  List1.AddItem oT(I).Artist & " - " & oT(I).Name
Next I

so im großen und ganzen. hab dann gleich mal ein programm geschrieben (da ich am tag zuvor rausbekommen hab, dass mein iPod Nano ja auch lyrics anzeigen kann), dass mir meine playlists in iTunes mit den entsprechenden Albumcovern und Lyrics auffüllt. is noch nicht ganz fertig, das teil, aber das mit den lyrics klappt schonmal perfekt.