WinAmp Pfad der aktuell gespielten Datei

[rat-cop]

Also auf der Seite
http://www.vb-fun.de/cgi-bin/loadframe.pl?ID=vb/tipps/tip0199.shtml
hab ich ein Projekt heruntergeladen, mit dem ich WinAmp fernsteuern kann. Ich versuch aber schon was laenger erfolglos den Pfad der aktuell gespielten Datei zu ermitteln.
Wie man den Titel herausbekommt weiss ich, indem man diesen Code verwendet

Public Function GetTitle() As String
  On Error Resume Next
  Dim strTitle As String
  strTitle = String$(2048, Chr$(32))

  GetWindowText WinampHandle, strTitle, Len(strTitle)
  strTitle = Trim$(Left$(strTitle, InStr(strTitle, "- Winamp") - 1))
  GetTitle = Trim$(mid$(strTitle, InStr(strTitle, chr$(32)), _
     Len(strTitle) - 1))
End Function

kann mir da jemand helfen?