VBS-Script cmd Befehle ausführen - Loop - zeitlich getrennt?

2 Antworten

While True
  <Befehl1>
  WScript.Sleep 5000
  <Befehl2>
  WScript.Sleep 5000
Wend

(ungetestet)

cool danke :) aber irgendwie funktioniert mein loop nicht.
Code: 

On Error Resume Next
Dim WshShell

Set WshShell = CreateObject("WScript.Shell")

While True

Dim pfadShell

pfadShell = "Pfad/Anwendung.exe "/Befehl activate""

Set WshShell = WScript.CreateObject ("WScript.Shell")
WshShell.Run pfadShell
Set WshShell = Nothing

WScript.Sleep 5000

pfadShell = "Pfad/Anwendung.exe "/Befehl deactivate""

Set WshShell = WScript.CreateObject ("WScript.Shell")
WshShell.Run pfadShell
Set WshShell = Nothing

WScript.Sleep 5000

Wend

0
@grillinator95
  • Dim pfadShell gehört meiner Meinung nach vor das While.
  • pfadShell = "Pfad/Anwendung.exe "/Befehl activate""Die inneren " müsstest du mit " jeweils entwerten, das heißt vor jedes innere " noch ein weiteres " stellen.Die Pfade müssten mit \, nicht mit / unterteilt werden.
  • Set WshShell = WScript.CreateObject ("WScript.Shell")...Set WshShell = Nothing Beides ist innerhalb der Schleife nicht mehr nötig. Den = Nothing Befehl könntest du unter das Wend packen.

Ansonsten bitte immer eine etwas genauere Fehlerbeschreibung liefern. Was funktioniert nicht? Welche Fehlermeldung bekommst du?

1

Warum ein VB-Script, welches CMD-Scripte aufruft?

Wie wäre es mit einem CMD, das CMD aufruft?

@echo off
title %0
:loop
call batch1.cmd
timeout /t 5 /nobreak
call batch2.cmd
timeout /t 5 /nobreak
goto :loop
Woher ich das weiß:Studium / Ausbildung – Seit 1981 befasse ich mich auch beruflich mit Computern

Was möchtest Du wissen?