mp3's mittels VB in winamp enqueuen?
MrPeace 04.05.2002 - 12:40 707 7
MrPeace
Big d00d
|
hi folks! zeit für ein bisschen vb, isn't it? ich würd' mir gern' so eine art mp3-verwaltung in access selberschreiben (dass es zur genüge freeware dafür gibt, weiss ich, aber ich hab meine md's und so auch in der db drin ...) ... und dazu würd' ich gern wissen, wie die windows-standard-dateioperationen (sprich: .exe -> ausführen; .bmp -> z.b. in paint öffnen; .mp3 -> in winamp enqueuen) in vb aufgerufen werden können ... mit shell(,) geht's nicht, das is ja nur für ausführbare programme thx im voraus
|
that
ModeratorHoffnungsloser Optimist
|
dann mach halt winamp.exe /add lärm.mp3
|
XeroXs
doh
|
hm, was andres
i bräuchat a prog des nach ausführen automatisch eine bestimmte playlist aktuallisiert mit allen mp3s aus einem bestimmten verzeichnis + unterverzeichnisse
mag mir ned wer sowas schreiben? oda gibz sowas eh?
|
that
ModeratorHoffnungsloser Optimist
|
dir /s /b > play.m3u
|
MrPeace
Big d00d
|
cooler ansatz, das problem von der anderen seite gepackt ;-) in der verknüpfung haut das auch ganz wunderbar hin ... nur im vb nicht: Call Shell("D:\Programme\Media\Winamp\winamp.exe /add 'i:\O mark knopfler - what it is.mp3'") im VB haut das aber deswegen nicht hin, weil er die doppelten anführungszeichen (rund um den mp3-dateinamen) syntaktisch nicht verträgt und mit den einfachen nimmt er den dateinamen nicht als ganzes sondern zerlegt ihn in die einzelnen wörter ... got solution?
|
MDK
Addicted
|
Versuchs mal mit doppelten doppelten Anführungszeichen Call Shell("D:\Programme\Media\Winamp\winamp.exe /add ""i:\O mark knopfler - what it is.mp3""")
|
MrPeace
Big d00d
|
Versuchs mal mit doppelten doppelten Anführungszeichen thx ... das war's ... *rofl* ... das is microsoft-logik folgendes: wenn ich "nur" doppelte anführungszeichen mach', funktioniert's zwar, wenn der name direkt drin steht .. wenn aber eine variable d'rinsteht, wird der name der var an winamp übergeben ... workaround? einfach noch einmal jeweils ein anführungszeichen dazu .... schaut dann folgendermassen aus: Function enqueue() Call callShell("D:\Programme\Media\Winamp\winamp.exe", "i:\O mark knopfler - what it is.mp3") End Function
Function callShell(winampExe, fileName) Call Shell(winampExe & " /add """ & fileName & """") End Functionbelieve it or not: it works!
Bearbeitet von MrPeace am 04.05.2002, 16:02
|
Ringding
Pilot
|
Ist vollkommen klar, dass das so ist und hat nix mit MS zu tun. Es ist nämlich z.B. in Pascal ganz genauso.
|