Autostartscript mit Abfrage möglich?

[matsch79]

Hallo alle zusammen

Ich nutze zum automatischen Starten von Programmen ein Script,
welches eine Zeitverzögerung erlaubt und mir die Reihenfolge
überläßt, wann was gestartet werden soll.
Dazu nutze ich das Script derzeit 2x mit zwei verschiedenen Intervallen.
Einmal 25 Sekunden und einmal 45 Sekunden.

Wenn der PC zum ersten Mal hochfährt ist es ja auch ganz gut so,
wie ich es mir zurechtgebastelt habe, doch wenn ich einen Neustart
durchführen lasse, dann brauche ich das zweite nicht und es läßt sich
auch nicht wirklich aufhalten.

Meine Frage dazu ist nun, ob es möglich ist, eine Abfrage für 10 Sekunden
oder so einzubauen, so daß es mir bei Anwesenheit erlaubt ist, den Start
zu unterbinden?
Und bei Nichtanwesenheit soll es dann (nach einer gewissen Wartezeit)
ganz normal weiterlaufen und die eingetragenen Programme starten.

Verwendet wird das bei mir als VBS so:

Option Explicit
Dim objShell
Dim intWarten  
intWarten = 25000 ' Millisekunden
WScript.Sleep intWarten
Set objShell = Wscript.CreateObject("Wscript.Shell")
objShell.Exec ("C:\Programme\Programm1\Programm.exe")
objShell.Exec ("C:\Programme\Programm2\Programm.exe")
objShell.Exec ("C:\Programme\Programm3\Programm.exe")
objShell.Exec ("C:\Programme\Programm4\Programm.exe")
objShell.Exec ("C:\Programme\Programm5\Programm.exe")

 

[matsch79]

*nach oben schieb*

 

[Norbert]

Hallo matsch,

da anscheinend niemand, leider auch einschließlich mir, eine Lösung kennt, folgender Vorschlag:

Mit dem Startup Delayer hatte ich in der Vergangenheit schon ähnliche Aufgaben problemlos lösen können.

Vielleicht wäre das was für Dich?

Gruß
Norbert

 

[matsch79]

So, habe das Ding nun getestet und wieder verworfen.
Ich hätte gern eine Lösung, die dem von mir gesuchten
Weg etwas näher kommt.

 

[Timelord]

Kenne mich leider nicht genug mit VBS aus, daher kann ich auch ganz falsch liegen:

Kannst du damit eine UserForm öffnen? Wenn ja einen Timer einbauen, der sie nach x Sekunden mit Status TRUE wieder schliesst (wenn du sie mit einem Button schliesst dann Status FALSE setzen) und eine if-Abfrage in deinem Skript, die den Status prüft.

 

[matsch79]

>>>>> Kannst du damit eine UserForm öffnen?

Nein, kann ich nicht. Ich habe das Ding aus irgendeiner Zeitung.
Kann das vielleicht jemand beantworten oder gar hier fertig anbieten?

 

[Razorblade]

Ich hab mal sowas erstellt. Der Sourcecode und das Kompilat sind in dem Zip-File.

Du kannst folgendes einstellen:
- Startreihenfolge
- Anzeigedauer des Popups
- Startintervall der Programme
- Steuerung per .ini

 

[matsch79]

Danke mein persönlicher Chefprogrammierer.
Auch dieses zweite Tool von dir macht genau was ich möchte.
Vielen Dank für die Superumsetzung.

Gelöst habe ich es nun so, daß ich nur noch ein Script laufen
lasse, welches die Programme nach 25 Sekunden startet und
dabei ist nun auch deine Exe, welche dann die dort eingetragenen
Programme nach einem sichtbaren Countdown startet,
welchen ich wie geünscht bei Bedarf unterbrechen kann.

Alternativ hatte ich dein Programm zweimal gestartet mit
verschiedenen Intervallen für die zwei Gruppen, aber das
ist Käse für mich, weil die erste Gruppe ja so oder so
starten muß, daß finde ich mit dem Script besser gelöst.

Mein Problem ist hiermit gelöst und bedarf keiner weiteren
Alternativen.

:huld Razorblade :huld