Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

gelöst Countdown während der Laufzeit wieder auf Anfang stellen und erst wenn t0 erreicht, dann ein bestimmtes Programm starten. Lösung als vbscript wäre schön

Mitglied: reinhr

reinhr (Level 1) - Jetzt verbinden

12.02.2018 um 14:47 Uhr, 249 Aufrufe, 9 Kommentare

Hallo Leute,

bestimmte Nutzer erzeugen zeitweise über eine Software mehrere Transaktionen in einer DB und nach
jeder einzelnen Transaktion wird automatisch ein bestimmtes Programm (A) gestartet.
Das hat zur Folge, dass das Programm möglicherweise mehrmals hintereinander gestartet wird.

Abhilfe soll ein Countdown schaffen.
Das Programm (A) soll nicht mehr direkt gestartet werden, sondern erst nach einem zuvor bei z.B. (t=30s) gestarteten Countdown,
welcher bei (t=0s) dann tätig wird. Wird jedoch während der Laufzeit des Countdown eine weitere Transaktion getätigt,
so soll der Countdown wieder von vorne bei (t=30s) beginnen.

Erst wenn keine Transaktionen mehr innerhalb der Laufzeit des Countdown getätigt werden, soll das Programm (A) gestartet werden.

Ideal wäre es, wenn das Ganze mit vbscript lösbar wäre.

Danke vorab für eure Lösungen

Gruß
Roland
Mitglied: Penny.Cilin
12.02.2018 um 15:57 Uhr
Hallo,

und hast Du schon einen Code?
Oder müssen wir für Dich die Arbeit machen?

Gruss Penny
Bitte warten ..
Mitglied: reinhr
12.02.2018 um 16:28 Uhr
Hallo Penny,

leider hab' ich noch keinen Code und auch keine Idee, sondern nur meine
Anforderung die euch übergeben habe, weil ich es alleine bestimmt nicht hin bekomme.

Gruß
Roland
Bitte warten ..
Mitglied: rubberman
12.02.2018 um 17:33 Uhr
bestimmte Nutzer erzeugen zeitweise über eine Software mehrere Transaktionen in einer DB und nach jeder einzelnen Transaktion wird automatisch ein bestimmtes Programm (A) gestartet.
Da musst du mal etwas konkreter werden. Denn entweder musst du genau an diesem Punkt ansetzen und die transaktions-erzeugende Software muss prüfen ob Programm A bereits läuft oder du musst zumindest beschreiben woher ein Script wissen soll, ob/wann eine Transaktion gestartet wurde um prüfen zu können ob in diesem Fall Programm A bereits läuft. Wobei letzteres nicht hilft wenn Software 1 Programm A trotzdem mehrfach automatisch ausführt. Irgendwie wird das so noch überhaupt nicht rund.

Steffen
Bitte warten ..
Mitglied: reinhr
12.02.2018 um 20:26 Uhr
Hallo Steffen,

wenn das Programm (A) bereits gestartet wurde - kein Problem - dann soll es bis zum Ende weiterlaufen.
Ein vorzeitiges Beenden ist dann nicht notwendig.

Programm (A) kann ja mehrfach gestartet werden, ich möchte nur nicht, dass das nach jeder Transaktion geschieht.

Die zeitliche Abfolge kann folgendermaßen aussehen:
5 Personen machen 10 einzelne Transaktionen innerhalb von 1 min., wobei sich die Personen nacheinander anmelden und zwischen
den nächsten Transaktionen gerne mal 2 min. vergehen.
Es entstehen also in 13 min. 50 Transaktionen.

Jede Transaktion stößt HEUTE über den Befehlsaufruf (X) das Programm (A) an.
Daraus folgt, dass das Programm (A) 50x innerhalb von 13 min. gestartet wird und das möchte ich nicht.

Ich möchte folgendes erreichen:
Befehlsaufruf (X) ZUKUNFT (LaunchProgramAfterCountdown Programm) soll gestartet werden.
Timer eingestellt auf z.B. (3 min = 180s)
Solange Transaktionen getätigt werden, wird der nun aktuell herunterzählende Countdown wieder mittels (X) auf 180s zurückgesetzt.
Erst wenn keine Transaktionen mehr während der Laufzeit des Countdown anfallen , wird am Ende das Programm (A) vom (bsp. LPAC.vbs Programm) 1x gestartet.

Gruß und Danke schon mal
Roland
Bitte warten ..
Mitglied: rubberman
12.02.2018 um 22:09 Uhr
Zitat von reinhr:
Solange Transaktionen getätigt werden ...
Erst wenn keine Transaktionen mehr während der Laufzeit des Countdown anfallen ...

Und da wären wir wieder bei meiner Frage:
woher ein Script wissen soll, ob/wann eine Transaktion gestartet wurde

Steffen
Bitte warten ..
Mitglied: reinhr
12.02.2018 um 23:04 Uhr
...ich dacht es ist dadurch möglich, weil ja das gleiche Script erneut gestartet wird.
Ggf. kann man ja folgenden Ansatz verfolgen:

Wenn der Task gestartet ist, dann beende den Prozess und starte den Prozess (Countdown) neu.

Roland
Bitte warten ..
Mitglied: rubberman
13.02.2018 um 00:57 Uhr
Das ganze ist schon ziemlich abstrakt für jemanden der nicht vor deinem Rechner sitzt.
Versuch:
01.
Option Explicit 
02.
 
03.
Const wait = 30 
04.
Const progPath = "C:\Windows\notepad.exe" 
05.
 
06.
Dim objFSO, objWSH, objWMI, colItems, objItem, ownPID 
07.
Set objFSO = CreateObject("Scripting.FileSystemObject") 
08.
Set objWSH = CreateObject("WScript.Shell") 
09.
Set objWMI = GetObject("winmgmts:\\.\root\CIMV2") 
10.
 
11.
' Prozess ID des eigenen Scriptprozesses 
12.
ownPID = objWMI.Get("Win32_Process.Handle='" & objWSH.Exec("mshta.exe").ProcessID & "'").ParentProcessId 
13.
 
14.
' Alle evtl. sonstigen Prozesse dieses Scripts beenden 
15.
Set colItems = objWMI.ExecQuery("SELECT * FROM Win32_Process WHERE Name='wscript.exe' " & _ 
16.
                                "AND CommandLine LIKE '%" & WScript.ScriptName & "%' " & _ 
17.
                                "AND ProcessID <> " & ownPID) 
18.
For Each objItem In colItems 
19.
  objItem.Terminate 
20.
Next 
21.
 
22.
' Warten 
23.
WScript.Sleep wait * 1000 
24.
 
25.
' Alle evtl. bereits laufendeden Instanzen des Programms beenden 
26.
Set colItems = objWMI.ExecQuery("SELECT * FROM Win32_Process WHERE Name='" & objFSO.GetFileName(progPath) & "'") 
27.
For Each objItem In colItems 
28.
  objItem.Terminate 
29.
Next 
30.
 
31.
' Programm starten 
32.
objWSH.Run """" & progPath & """"
Da du auf ein VBScript abgezielt hast, gehe ich davon aus dass du den Code verstehst und eventuelle Anpassungen oder Korrekturen selbst vornimmst.

Steffen
Bitte warten ..
Mitglied: reinhr
14.02.2018 um 09:20 Uhr
Hallo Steffen,

Du bist der der Hammer!!! Genau so ausgestaltet wie ich es brauche - habe es eben ausprobiert.
Spitzen Arbeit ohne Fehler!

Vielen, vielen Dank!


Gruß
Roland
Bitte warten ..
Mitglied: rubberman
14.02.2018 um 12:02 Uhr
Da du explizit auf eine Timeout-Lösung hingearbeitet hast, bin ich davon ausgegangen, dass die offensichtlich einfachste Lösung nicht infrage kommt. Die wäre nämlich, dass das Script prüft ob schon eine Instanz des Programms läuft und nur dann eine neue Instanz des Programms startet, falls nicht. Aber wie gesagt, deine Erklärungen sind zu unspezifisch, als dass ich hätte entscheiden können ob das eine Option wäre.

Steffen
Bitte warten ..
Ähnliche Inhalte
LAN, WAN, Wireless
Countdown-Lösung für LAN
Frage von keine-ahnungLAN, WAN, Wireless27 Kommentare

Moin miteinander, kennt zufällig jemand eine Software, die einen (leicht) einstellbaren countdown im LAN propagieren kann? Um das mal ...

Windows Tools
Programm auf bestimmten Monitor starten
gelöst Frage von djevil-adWindows Tools4 Kommentare

Hallo, ich hab da mal eine recht simple Frage, aber ich weiss nicht wie ich es am Besten machen ...

Batch & Shell

Batch erst starten wenn bestimmte Datei vorhanden ist

gelöst Frage von pdiddoBatch & Shell7 Kommentare

Hi Jung, in meiner batch wird eine .txt Datei bearbeitet. Diese .txt ist aber nur bei einer bestimmten Ereignisauslösung ...

VB for Applications

Per VBScript Zeile nach bestimmter Stelle einfügen dabei mit numerierung fortfahren!

gelöst Frage von aletriVB for Applications4 Kommentare

Guten Abende allerseits Dies ist ein Auszug der Datei an der eine Zeile eingefügt werden soll:

Neue Wissensbeiträge
Google Android

Googles "Android Enterprise Recommended" für Unternehmen

Information von kgborn vor 1 StundeGoogle Android

Hier eine Information, die für Administratoren und Verantwortliche in Unternehmen, die für die Beschaffung und das Rollout von Android-Geräten ...

Sicherheit

Intel gibt neue Spectre V2-Microcode-Updates frei (20.02.2018)

Information von kgborn vor 1 StundeSicherheit

Intel hat zum 20. Februar 2018 weitere Microcode-Updates für OEMs freigegeben, um Systeme mit neueren Prozessoren gegen die Spectre ...

Microsoft
ARD-Doku - Das Microsoft Dilemma
Tipp von Knorkator vor 4 StundenMicrosoft2 Kommentare

Hallo zusammen, vor einigen Tagen lief in der ARD u.a. Reportage. Das Youtube Video dazu dürfte länger verfügbar sein. ...

Windows 10

Neue Sicherheitslücke in Windows 10 (Version 1709) durch Google öffentlich geworden

Information von kgborn vor 22 StundenWindows 10

Vor ein paar Tagen haben Googles Sicherheitsforscher vom Projekt Zero eine Sicherheitslücke im Edge-Browser publiziert. Jetzt wurde eine weitere ...

Heiß diskutierte Inhalte
Windows Server
AD DS findet Domäne nicht, behebbar?
Frage von schapitzWindows Server35 Kommentare

Guten Tag, ich habe bei einem Kunden ein Problem mit den AD DS. Umgebung ist folgende: Windows Server 2016 ...

Router & Routing
LANCOM VPN CLIENT einrichten
Frage von Finchen961988Router & Routing27 Kommentare

Hallo, ich habe ein Problem und hoffe ihr könnt mir helfen, wir haben einen Kunden der hat einen Speedport ...

CPU, RAM, Mainboards
32 gb RAM zu wenig?
Frage von pcguyCPU, RAM, Mainboards13 Kommentare

Hallo zusammen, mein PC verfügt über 32GB Ram. Nun kriege ich bei grossen Dateien im Illustrator die Fehlermeldung das ...

Router & Routing
ISC DHCP 2 Subnetze
gelöst Frage von janosch12Router & Routing9 Kommentare

Hallo, ich betreibe bei mir im Netzwerk einen ISC DHCP Server auf Debian, der DHCP verwaltet aktuell ein /24 ...