gelöst 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:
01.
Set Sound = CreateObject("WMPlayer.OCX.7")
02.
Sound.URL = "Text.wav"
03.
Sound.Controls.play
04.
do while Sound.currentmedia.duration = 0
05.
wscript.sleep 100
06.
loop
07.
wscript.sleep (int(Sound.currentmedia.duration)+1)*10001) 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?
3 Antworten
- LÖSUNG aen1337 schreibt am 08.02.2019 um 15:07:09 Uhr
- LÖSUNG 138721 schreibt am 08.02.2019 um 15:44:27 Uhr
- LÖSUNG Ileies schreibt am 09.02.2019 um 18:35:20 Uhr
LÖSUNG 08.02.2019, aktualisiert um 15:50 Uhr
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.
01.
Set Sound = CreateObject("WMPlayer.OCX")
02.
Set objShell = CreateObject("Wscript.Shell")
03.
Sound.settings.volume = 90
04.
Sound.settings.autoStart = True
05.
Sound.URL = "Text.wav"
06.
07.
Set cmd = objShell.Exec("calc.exe")
08.
Do While cmd.Status = 0
09.
WScript.Sleep 100
10.
If Sound.playState <> 3 Then Sound.Controls.play
11.
Loop01.
Set Sound = CreateObject("WMPlayer.OCX")
02.
Sound.settings.volume = 90
03.
'Sound.settings.autoStart = True
04.
Sound.URL = "Text.wav"
05.
For i = 1 To 3
06.
Sound.Controls.play
07.
While sound.playState <> 1
08.
WScript.Sleep 100
09.
Wend
10.
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.
LÖSUNG 09.02.2019 um 18:35 Uhr
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
Ähnliche Inhalte
Neue Wissensbeiträge
Heiß diskutierte Inhalte
