Also normalerweise geht das schon bestens, auch mit dem Demofile.

Allerdings scheint nun mal wieder das allseits "so beliebte" XP Service Pack von Microsoft dafür gesorgt zu haben das es nicht mehr so recht mit allen Dateien geht. Jedenfalls ging´s auf gleichen Rechner vor dem Service Pack.

Ich bin momentan bei den Sound-Api von Microsoft nicht auf dem neusten stand. Weiss jemand zufällig was da wieder mal an der API-Funktion gebastelt wurde?

Declare Function sndPlaySound Lib "winmm" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

Hat jemand eine funktionstüchtige Ersatz-Routine aus der API, würde mir etwas Zeit ersparen.