Ahoj, jak si prosím ve windows vytvořím na plochu zástupce, který zabije aplikaci a hned ji zase spustí? Třeba s několkavteřinovým waitem/sleepem?
Součástí otázky jsou i souvislosti kolem, např, jak zjistím, nějaký statický identifikátor aplikace, jelikož předpokládám, že PID se mění.
Děkuji za pomoc.
Zástupce pro restart aplikace Vyřešeno
-
- Level 3
- Příspěvky: 499
- Registrován: červenec 13
- Pohlaví:
- Stav:
Offline
- ITCrowd
- Tvůrce článků
-
Guru Level 13.5
- Příspěvky: 23610
- Registrován: březen 10
- Pohlaví:
- Stav:
Offline
Re: Zástupce pro restart aplikace
vbs skript.
Nač to potřebuješ?
Nač to potřebuješ?
Zkusili jste to vypnout a zapnout? Problémy řeším pouze v tématech. Do SZ mi proto píšete zbytečně.
Základní diagnostika WiFi Jak na diagnostiku sítě Router jako switch Proč je nesmysl chtít router s velkým dosahem Vybíráme router
Základní diagnostika WiFi Jak na diagnostiku sítě Router jako switch Proč je nesmysl chtít router s velkým dosahem Vybíráme router
-
- Level 3
- Příspěvky: 499
- Registrován: červenec 13
- Pohlaví:
- Stav:
Offline
Re: Zástupce pro restart aplikace
Jeden pofidérní program občas přestane dělat co má, ale přesto běží. Ale nedělá nic, tak ho potřebuji vypnout a zapnout.
Byl by někdo tak hodný a ten vbs skript mi mohl napsat? Hádám, že to budeou tři commandy na 10 vteřin práce, pokud to umíte. Dalších 30 vteřin mi vysvětlit, jak ten skript spouštět zástupcem z plochy. Případně 15 vteřin ještě vygooglit, jaký přepínače mají být za pro zabití podle nějakého statického identifikátoru namísto zřejme defaultního PID.
V pro CLI linuxu bych to měl z hlavy, něco jako:
Potřebuji to jen přepsat do Windows řeči.
Prosím pěkně.
Byl by někdo tak hodný a ten vbs skript mi mohl napsat? Hádám, že to budeou tři commandy na 10 vteřin práce, pokud to umíte. Dalších 30 vteřin mi vysvětlit, jak ten skript spouštět zástupcem z plochy. Případně 15 vteřin ještě vygooglit, jaký přepínače mají být za pro zabití podle nějakého statického identifikátoru namísto zřejme defaultního PID.
Kód: Vybrat vše
kill -nejak neco
sllep/wait 5
run /path/to/neco.exe
V pro CLI linuxu bych to měl z hlavy, něco jako:
Kód: Vybrat vše
PID=$(ps ax | grep "neco")
kill $PID
sleep 5
cd /path/to/app && ./app
Potřebuji to jen přepsat do Windows řeči.
Prosím pěkně.
- ITCrowd
- Tvůrce článků
-
Guru Level 13.5
- Příspěvky: 23610
- Registrován: březen 10
- Pohlaví:
- Stav:
Offline
Re: Zástupce pro restart aplikace
Nástřel by mohl vypadat nějak takhle:
Pokud budeš mít zájem, klidně to napíšu a odladím třeba na notepad, který si pak nahradíš svým programem.
Kód: Vybrat vše
Option Explicit
Dim oWMI, colProcess, Process, WshShell, prikaz, ProgramID
Set oWMI = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")
Set colProcess = oWMI.ExecQuery ("SELECT * FROM Win32_Process WHERE Name LIKE 'Program%'")
If colProcess.count > 0 Then
For Each Process In colProcess
ProgramID = Process.ProcessID
Set WshShell = WScript.CreateObject("WScript.Shell")
prikaz = "cmd.exe /C taskkill /PID " & ProgramID
WshShell.Run prikaz, 1, True
WScript.Sleep 5000
prikaz = "c:\adresar\program.exe"
WshShell.Run prikaz, 1, True
End If
Set oWMI = Nothing
Set colProcess = Nothing
Set WshShell = Nothing
Pokud budeš mít zájem, klidně to napíšu a odladím třeba na notepad, který si pak nahradíš svým programem.
Zkusili jste to vypnout a zapnout? Problémy řeším pouze v tématech. Do SZ mi proto píšete zbytečně.
Základní diagnostika WiFi Jak na diagnostiku sítě Router jako switch Proč je nesmysl chtít router s velkým dosahem Vybíráme router
Základní diagnostika WiFi Jak na diagnostiku sítě Router jako switch Proč je nesmysl chtít router s velkým dosahem Vybíráme router
-
- Level 3
- Příspěvky: 499
- Registrován: červenec 13
- Pohlaví:
- Stav:
Offline
Re: Zástupce pro restart aplikace
S tímhle sem si hrál na vejšce v excelu.
1. Děkuji ti moc, nečekal sem, že to bude takhle hustě udělaný.
2. Pokud chápu, mám ve vyhledávacím dotazu upravit LIKE klauzuli + upravit cestu v proměnné "prikaz". Nic víc?
3. Tohle je nejaky.vbs skript a stačí zástupci na ploše přidat cestu něco jako spouštění programu wscript s nějakými parametry jako třeba cesta k tomu skriptu? Nebo jak to namontovat pro spouštění zástupce z plochy.
1. Děkuji ti moc, nečekal sem, že to bude takhle hustě udělaný.
2. Pokud chápu, mám ve vyhledávacím dotazu upravit LIKE klauzuli + upravit cestu v proměnné "prikaz". Nic víc?
3. Tohle je nejaky.vbs skript a stačí zástupci na ploše přidat cestu něco jako spouštění programu wscript s nějakými parametry jako třeba cesta k tomu skriptu? Nebo jak to namontovat pro spouštění zástupce z plochy.
Re: Zástupce pro restart aplikace
Jeden pofidérní program občas přestane dělat co má, ale přesto běží. Ale nedělá nic, tak ho potřebuji vypnout a zapnout.
A nebylo by efektnější/lepší, odstranit příčinu, než řešit následek?
- ITCrowd
- Tvůrce článků
-
Guru Level 13.5
- Příspěvky: 23610
- Registrován: březen 10
- Pohlaví:
- Stav:
Offline
Re: Zástupce pro restart aplikace
scientific:
Chápeš to dobře.
Jinak stačí napsat to v notepadu, uložit s příponou .vbs. Pokud chceš tvořit zástupce, pak si ten script někam ulož a vytvoř k němu zástupce. Jinak stačí jen ho zkopírovat na plochu. Reaguje na dvojité poklikání, nic dalšího netřeba.
mirekol:
ne každá aplikace je správně napsána. Navíc může být i starší a programátoři už vyhynuli. Takže restart aplikace bývá často jediným a nejjednodušším řešením. Což v podstatě platí i pro hnusná wokna, kdy se leccos restartem vyřeší.
Chápeš to dobře.
Jinak stačí napsat to v notepadu, uložit s příponou .vbs. Pokud chceš tvořit zástupce, pak si ten script někam ulož a vytvoř k němu zástupce. Jinak stačí jen ho zkopírovat na plochu. Reaguje na dvojité poklikání, nic dalšího netřeba.
mirekol:
ne každá aplikace je správně napsána. Navíc může být i starší a programátoři už vyhynuli. Takže restart aplikace bývá často jediným a nejjednodušším řešením. Což v podstatě platí i pro hnusná wokna, kdy se leccos restartem vyřeší.
Zkusili jste to vypnout a zapnout? Problémy řeším pouze v tématech. Do SZ mi proto píšete zbytečně.
Základní diagnostika WiFi Jak na diagnostiku sítě Router jako switch Proč je nesmysl chtít router s velkým dosahem Vybíráme router
Základní diagnostika WiFi Jak na diagnostiku sítě Router jako switch Proč je nesmysl chtít router s velkým dosahem Vybíráme router
- TheSalon112
- Level 3
- Příspěvky: 440
- Registrován: červen 14
- Bydliště: localhost
- Pohlaví:
- Stav:
Offline
Re: Zástupce pro restart aplikace Vyřešeno
Myslím si, že cez cmd to bude omnoho jednoduhšie, ako cez VB script
Príklad v praxi:
Uložíš ako .bat napr na plochu, a dvojitým poklepaním sa spustí, čo sa požaduje :)
Ak nevieš, ako vytvoriť bat súbor, návod napr tu: https://sk.ateasyday.com/articles/windo ... ndows.html
Kód: Vybrat vše
taskkill /f /t /im proces.exe
timeout 5 /NOBREAK >NUL //počet sekúnd - 5
start "" "cesta_k_procesu" //Prvé uvodzovky ostávajú prázdne, do druhých sa píše cesta
Príklad v praxi:
Kód: Vybrat vše
taskkill /f /t /im chrome.exe
timeout 5 /NOBREAK >NUL
start "" "C:\Program Files (x86)\Google\Chrome\Application\chrome.exe"
Uložíš ako .bat napr na plochu, a dvojitým poklepaním sa spustí, čo sa požaduje :)
Ak nevieš, ako vytvoriť bat súbor, návod napr tu: https://sk.ateasyday.com/articles/windo ... ndows.html
MOJE ŽELEZO:
CPU: Intel core I7 870 2,93 GHz
CPU Cooler: SilentiumPC Fera 2 HE 1224
GPU: ASUS GTX1050 TI 4GB
HDD: WDC Black 1TB
SSD: Samsung 850EVO 120GB
MotherBoard: Asus P7P55D-E
RAM: 4X Kingston DDR3 2GB Value RAM
PSU: Seasonic S12ii-520
Bedňa: Corsair SPEC-03 Red LED
Blue-Ray Mechanika: LG BH10LS30
CPU: Intel core I7 870 2,93 GHz
CPU Cooler: SilentiumPC Fera 2 HE 1224
GPU: ASUS GTX1050 TI 4GB
HDD: WDC Black 1TB
SSD: Samsung 850EVO 120GB
MotherBoard: Asus P7P55D-E
RAM: 4X Kingston DDR3 2GB Value RAM
PSU: Seasonic S12ii-520
Bedňa: Corsair SPEC-03 Red LED
Blue-Ray Mechanika: LG BH10LS30
-
- Level 3
- Příspěvky: 499
- Registrován: červenec 13
- Pohlaví:
- Stav:
Offline
Re: Zástupce pro restart aplikace
Děkuji moc Vám oběma, přesně tohle jsem chtěl, díky moc.
Řešení od ITCrowd je bez pochyby mnohem propracovanější a elegantnější, nicméně, mě stačí ta jednodušší primitivnější cesta, u které rozumím každému primitivnímu řádku.
Řešení od TheSalon112 jsem ověřil a funguje, ale nepochybuji o tom, že funguje i to propracovanější.
Díky moc.
Řešení od ITCrowd je bez pochyby mnohem propracovanější a elegantnější, nicméně, mě stačí ta jednodušší primitivnější cesta, u které rozumím každému primitivnímu řádku.
Řešení od TheSalon112 jsem ověřil a funguje, ale nepochybuji o tom, že funguje i to propracovanější.
Díky moc.
-
- Mohlo by vás zajímat
- Odpovědi
- Zobrazení
- Poslední příspěvek
-
- 1
- 860
-
od ITCrowd
Zobrazit poslední příspěvek
02 úno 2024 08:36
-
- 4
- 1374
-
od Serg01
Zobrazit poslední příspěvek
16 lis 2023 17:27
-
- 1
- 1127
-
od petr22
Zobrazit poslední příspěvek
28 led 2024 12:36
-
-
Explorer.exe - chyba aplikace 0x0000000000000024
od Dav98786 » 31 led 2024 20:26 » v Windows 11, 10, 8... - 2
- 947
-
od Dav98786
Zobrazit poslední příspěvek
01 úno 2024 09:17
-
-
-
Žlutomodrý štít u ikony aplikace w11 Příloha(y)
od PittnerJiri » 01 srp 2023 15:03 » v Windows 11, 10, 8... - 5
- 2260
-
od petr22
Zobrazit poslední příspěvek
23 zář 2023 19:16
-
Zpět na “Windows 11, 10, 8...”
Kdo je online
Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 7 hostů