WMP playlist auslesen

Computer: Software & Programmierung Visual Basic
1

so mal wieder ein problem.
nun hab ich soweit alles fertig an dieser sache.
so siehts aus:
http://www.flirt-mania.de/tid-fertig.bmp

jetzt möchte ich gerne das links neben dem mp noch die playlist angezeigt wird damit man wenigstens ungefähr weiß welches lied gerade läuft bzw so zur orientierung.
danke schon mal im voraus

2

Hallo,

ich vermute mal das du den MediaPlayer als ActiveX Controll ansprichst. Dann gibt es zum PlayerObjekt eine .mediaCollection.
Hierzu gibt es dann Eigenschaften wie .currentMedia, .currentPlaylist, .sourceURL etc.

Tschau
Peter

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

3

also ich benutze das steuerelement von vb6 für den windows media player.
wo muß ich das denn dann eingeben?
der name des steuerelements ist windowsmediaplayer1

4

Na ja ganz einfach

z.B. windowsmediaplayer1.CurrentMedia

also ich benutze das steuerelement von vb6 für den windows
media player.
wo muß ich das denn dann eingeben?
der name des steuerelements ist windowsmediaplayer1

5

also ich hab jetzt ne list box und folgendes im code aber da wird nix angezeigt:
Private Sub List1_Click()
WindowsMediaPlayer1.currentMedia
End Sub

6

auch kein wirkliches Problem:

Ein Textfeld irgendwo plazieren, einen Namen vergeben (z.B. txtCurrMedia)
Private Sub List1_Click()

txtCurrMedia.Caption = WindowsMediaPlayer1.currentMedia

End Sub

also ich hab jetzt ne list box und folgendes im code aber da
wird nix angezeigt:
Private Sub List1_Click()
WindowsMediaPlayer1.currentMedia
End Sub

7

Also ich hab alles so gemacht wie beschrieben
aber über die vorschau (die play taste bei VB)
wird gar nichts angezeigt und wenn ich ne exe erstellen will
kommt „Argument nicht optional“ und makiert wird mir ".Caption = ".
falls es hilft ich benutze VB6 und das steuerelement vom mediaplayer 9

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

8

OK,

ich habs gearde nochmal ausprobiert:

Formular erstellt,
MediaPlayerOCX mit Namen WMPlayer1
Button btnPlayFile
Label txtCurrFile

Dann im Klick-Event folgendes

Private Sub btnPlayFile_Click()

Dim strFile As String

strFile = „C:\Videos\testVideo.asf“
WMPlayer1.URL = strFile
txtCurrFile = WMPlayer1.currentMedia.sourceURL

End Sub

Funktioniert!

btw: Bei VisialBasic wird normalerweise auch eine MSDN mitgelierfert, dort findet man genau fuer diese Anwendung Beispiele. Und manchmal hilft es auch wenn man sich das ActiveX-Control im Objektbrowser mal genauer anschaut, dann kann man meist aus den forhandenen Methoden auf die richtige anwendung schliessen. rtfm!!