vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
sevDataGrid - Gönnen Sie Ihrem SQL-Kommando diesen krönenden Abschluß!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2024
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB & Windows API
mciSendString zum Ändern Abspieldauer MP3 
Autor: renni
Datum: 27.10.09 23:23

Hallo und Guten Abend,

ich möchte eine MP3-Datei mal schneller und mal langsamer abspielen. Allerdings habe ich mit dem folgenden Code das Problem, dass er auf dem einen Rechner funktioniert und auf dem anderen nicht. Kann das jemand nachvollziehen oder kennt vielleicht die Lösung?

Beide Rechner sind XP.

Vielen Dank im voraus.

Renni

---
CODE:

Private Declare Function mciSendString Lib "winmm.dll" _
Alias "mciSendStringA" ( _
ByVal lpstrCommand As String, _
ByVal lpstrReturnString As String, _
ByVal uReturnLength As Long, _
ByVal hwndCallback As Long) As Long


Sub test()
Dim sPath As String
Dim sCmd As String

'** datei ohne leerzeichen
sPath = "c:\test.mp3"
sCmd = "Open """ & sPath & """ type mpegvideo alias tempMCI"

mciSendString sCmd, 0, 0, 0
mciSendString "play tempMCI", 0, 0, 0
mciSendString "set TempMCI audio all on", 0, 0, 0 '** mehr Soundkarten?!


'** Ändern der Geschwindigkeit
mciSendString "set tempMCI speed 1500", 0, 0, 0

Stop '** hier läuft die MP3-Datei schneller oder nicht

'** beenden und schließen MCI
mciSendString "stop tempMCI", 0, 0, 0
mciSendString "close tempMCI", 0, 0, 0

End Sub
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
mciSendString zum Ändern Abspieldauer MP33.514renni27.10.09 23:23
Re: mciSendString zum Ändern Abspieldauer MP32.352ModeratorMartoeng27.10.09 23:36
Re: mciSendString zum Ändern Abspieldauer MP32.374renni28.10.09 09:01
Re: mciSendString zum Ändern Abspieldauer MP32.369ModeratorMartoeng28.10.09 12:06
Re: mciSendString zum Ändern Abspieldauer MP32.306renni29.10.09 08:28
Re: mciSendString zum Ändern Abspieldauer MP32.341ModeratorMartoeng29.10.09 09:09
Re: mciSendString zum Ändern Abspieldauer MP32.440renni29.10.09 10:06
Re: mciSendString zum Ändern Abspieldauer MP32.326renni30.10.09 16:49

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2024 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel