Proces blijft lopen

Status
Niet open voor verdere reacties.

willema

Gebruiker
Lid geworden
26 aug 2005
Berichten
308
Hey allen,

De laatste weken gebeurt het dat binnen dezelfde Windows-sessie na gebruik en afsluiten van software die niet meer opnieuw opgestart kan worden.
Klikken op bvb. het icoontje van Excel en er gebeurt niets.

Nu heb ik ondertussen in het Taakbeheer onder processen gevonden dat na afsluiten dat proces actief blijft. Als ik daar dan op Excel Beëindigen klik, dan start die terug proper op.
Hoe komt het eigenlijk dat bij afsluiten (rood kruisje) van software die toch niet wordt beëindigd als proces en wat is hier aan te doen ?

het lijkt zich altijd voor te doen bij bepaalde software (Excel, maar ook Adobe Premiere en zelfs het piepkleine Snip).
 
Stap 1:
  1. klik op de knop Start, typ regedit in het vak Zoeken & ENTER.* Typ het wachtwoord of een bevestiging als hierom wordt gevraagd.
  2. Klik linksboven in de menubalk op bestand & vervolgens op exporteren.
  3. Kies bovenin het scherm bij "Opslaan in" de plek waar je uw backup van het register wilt opslaan.
  4. Let erop dat je links beneden bij exportbereik "alles" selecteert.
    Geef het bestand een naam, bijvoorbeeld registerbackup.reg.
    registerbackup.png
  5. Bij "opslaan als" selecteer je Registerbestanden (*.reg)
  6. Klik tenslotte op opslaan.


Stap 2:
Combineer
windowstoetsr.png
→ typ: notepad
Kopieer onderstaande code:
On Error Resume Next

Set WshShell = WScript.CreateObject("WScript.Shell")

'1 Vastlopers sneller afsluiten huidige gebruiker (750 msec = 0.75 sec)
WshShell.RegWrite "HKEY_CURRENT_USER\Control Panel\Desktop\HungAppTimeOut",750,"REG_SZ"
'2 Vastlopers sneller afsluiten alle gebruikers (750 msec = 0.75 sec)
WshShell.RegWrite "HKEY_USERS\.DEFAULT\Control Panel\Desktop\HungAppTimeOut",750,"REG_SZ"
'3 Automatisch taken beëindigen bij afsluiten pc alle gebruikers
WshShell.RegWrite "HKEY_USERS\.DEFAULT\Control Panel\Desktop\AutoEndTasks",1,"REG_SZ"
'4. Afsluiten Windows versnellen (1/3)
WshShell.RegWrite "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Control\WaitToKillServiceTimeout",1,"REG_DWORD"
'5. Afsluiten Windows versnellen (2/3)
WshShell.RegWrite "HKEY_LOCAL_MACHINE\System\ControlSet001\Control\WaitToKillServiceTimeout",1,"REG_DWORD"
'6. Afsluiten Windows versnellen (3/3)
WshShell.RegWrite "HKEY_LOCAL_MACHINE\System\ControlSet003\Control\WaitToKillServiceTimeout",1,"REG_DWORD"
'7. NTFS-informatie afslanken
WshShell.RegWrite "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Control\FileSystem\NtfsDisableLastAccessUpdate",1,"REG_DWORD"

Message = "Windows werkt nu optima forma!" & vbCrLf & "Om iets van deze wijzigingen te merken moet de computer opgestart worden!"

X = MsgBox(Message, vbInformation, "Sluit processen & Windows sneller af!")

Set WshShell = Nothing

Ga naar Bestand - Opslaan als.
Bij "Opslaan in" kies je: Bureaublad.
Bij "Bestandsnaam" zet je:fastenshutdown.vbs.
Bij "Opslaan als type" selecteer je: Alle bestanden (*.*).
Klik op de knop Opslaan. Rechtsklik fastenshutdown.vbs → Openen.
 
Dankjewel Dorado, ziet er complex uit maar ik zal het in detail bestuderen en uitvoeren volgens jouw instructies !
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan