Script: elenco programmi in esecuzione automatica

Manutenzione WindowsVerificare, anche da remoto, quali programmi si avviano in esecuzione automatica

Per chi si guadagna la pagnotta come tecnico informatico, si imbatte spesso in ticket per pc lenti, spesso è il solito problema all’avvio che carica un sacco di programmi che vengono usati raramente. Durante l’installazione molti programmi vengono avviati in esecuzione automatica per migliorare la user experience, ma tanti programmi avviati contemporaneamente rallentano tutti gli avvii del pc e quindi dove possibile è meglio togliere tutti questi programmi e lasciare il più possibile libero il pc all’avvio.

lista programmi in esecuzione automaticaCome si vede nell’immagine qui a lato, lo script enumera tutti i software che partono in avvio automatico e in quale percorso:

  • se è in startup è dentro la cartella di Esecuzione automatica dal menù start oppure C:\ Users\ <utente>\ AppData\ Roaming\ Microsoft\ Windows\ Start Menu\ Programs\ Startup
  • se è una chiave di registro si trova tramite il comando msconfig
' Lista programmi in avvio automatico
'
' Andrea Cavazzi www.itmaniac.it
'-------------------------------------------------

'versione script
Versione = "1.1.2"
strComputer = (InputBox(" Inserisci nome del computer" _
	& vbCrLf & vbCrLf & vbCrLf & vbCrLf & vbTab & vbTab & vbTab & vbTab & "versione " & Versione,_
	"Lista avvio automatico   ver. " & Versione, "."))

'intercetto click annulla
if IsEmpty(strComputer) then
	Wscript.echo "test annullato, bye!"
	WScript.Quit
end if

Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set Obj = objWMIService.ExecQuery ("Select * from Win32_StartupCommand")

dim Output

  Output = "Lista programmi all'avvio" & vbCrLf & vbCrLf 

For Each item in Obj
  Name = item.Name
  Command = item.Command
  Location = item.Location

  Output = Output & "Name: " & Name & vbCrLf
  Output = Output & "Command: " & Command & vbCrLf
  Output = Output & "Location: " & Location & vbCrLf & vbCrLf
Next

wscript.echo Output

wscript.Quit(0)

Lo script funziona se si hanno diritti di amministratore in locale e anche di dominio nel caso di pc remoti, funziona su Windows 7, 8, 8.1, 10 sia in versione 32bit che 64bit. non funziona con Windows XP

Download VirusTotal: OK

 

Potrebbero interessarti anche...

Una risposta

  1. 17/12/2017

    Very good article. I certainly appreciate this site. Continue the good work!

Lascia un commento

Il tuo indirizzo email non sarà pubblicato. I campi obbligatori sono contrassegnati *

Questo sito usa Akismet per ridurre lo spam. Scopri come i tuoi dati vengono elaborati.