138701
08.02.2019, aktualisiert am 09.02.2019
4661
3
0
Musik-Loop in VBS
Hallo zusammen,
Ich habe folgendes Programm geschrieben:
Durch das Programm wird eine Musikdatei einmal im Hintergrund abgespielt.
1) Wie kann ich machen, dass die Musikdatei solange wiederholt wird bis ein anderer Befehl ausgeführt wurde?
2) Wie kann ich einstellen, dass sie z.B. 3mal hintereinander wiederholt wird?
3) Wie kann ich sie während sie noch am laufen ist beenden?
Ich habe folgendes Programm geschrieben:
Set Sound = CreateObject("WMPlayer.OCX.7")
Sound.URL = "Text.wav"
Sound.Controls.play
do while Sound.currentmedia.duration = 0
wscript.sleep 100
loop
wscript.sleep (int(Sound.currentmedia.duration)+1)*1000Durch das Programm wird eine Musikdatei einmal im Hintergrund abgespielt.
1) Wie kann ich machen, dass die Musikdatei solange wiederholt wird bis ein anderer Befehl ausgeführt wurde?
2) Wie kann ich einstellen, dass sie z.B. 3mal hintereinander wiederholt wird?
3) Wie kann ich sie während sie noch am laufen ist beenden?
Auf Facebook teilen
Auf Twitter teilen
Auf Reddit teilen
Auf Linkedin teilenBitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 415686
Url: https://administrator.de/forum/musik-loop-in-vbs-415686.html
Ausgedruckt am: 22.12.2024 um 22:12 Uhr
3 Kommentare
Neuester Kommentar
1.)
2.)
3.) ==> Deine Hausaufgabe
Mit dieser Lektüre ein Kinderspiel
https://docs.microsoft.com/en-us/windows/desktop/wmp/player-object
https://docs.microsoft.com/en-us/windows/desktop/wmp/controls-stop
Gruß l.
Set Sound = CreateObject("WMPlayer.OCX")
Set objShell = CreateObject("Wscript.Shell")
Sound.settings.volume = 90
Sound.settings.autoStart = True
Sound.URL = "Text.wav"
Set cmd = objShell.Exec("calc.exe")
Do While cmd.Status = 0
WScript.Sleep 100
If Sound.playState <> 3 Then Sound.Controls.play
LoopSet Sound = CreateObject("WMPlayer.OCX")
Sound.settings.volume = 90
'Sound.settings.autoStart = True
Sound.URL = "Text.wav"
For i = 1 To 3
Sound.Controls.play
While sound.playState <> 1
WScript.Sleep 100
Wend
NextMit dieser Lektüre ein Kinderspiel
https://docs.microsoft.com/en-us/windows/desktop/wmp/player-object
https://docs.microsoft.com/en-us/windows/desktop/wmp/controls-stop
Gruß l.
Hallo 138721,
Dein erstes Programm bringt mich leider nicht weiter, da es nur solange funktioniert wie der Rechner läuft...
Wie kann ich es benutzen ohne einen Taschenrechner im Hintergrund zu haben?
Bis jetzt habe ich mich erst nur mit Batch befasst. Könntest du es so umformen, dass ich es mit einem Batch Befehl beenden kann?
Taskkill funktioniert nicht...
Ileies
Dein erstes Programm bringt mich leider nicht weiter, da es nur solange funktioniert wie der Rechner läuft...
Wie kann ich es benutzen ohne einen Taschenrechner im Hintergrund zu haben?
Bis jetzt habe ich mich erst nur mit Batch befasst. Könntest du es so umformen, dass ich es mit einem Batch Befehl beenden kann?
Taskkill funktioniert nicht...
Ileies
