Newsgroup: it.comp.aiuto
Titolo: chiusura computer alla chiusura di un programma

Ho comprato un hardware dela pinnacle, quello che permette di vedere la tv
sul pc...fino a qui tutto bene, funziona perfettamente..l unica pecca è
che si puo vedere solo quando la tv è accesa e cosi ogni volta che vado a
ninna devo spegnere il computer per non dovermi poi rialzare chicca a che
ora e chiudere tutto..
allora mi chiedevo..esiste un programma che riconosca l'interruzione
(inteso come chiusura) di un processo e da li mi spenga il computer in
automatico?
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 automatico?
Exec >>> avvia un programma e ne intercetta la chiusura
(che dece esere autonoma del programma) poi al
verificarsi dell' evento puoi lanciare anche da linea
di comando o bat o vbs lo spegnimento del pc [1]
[1
http://aumha.org/win4/a/shutcut.htm
(se non e' quello giusto cerca nel menu a sinistra)]
'exec.vbs generico
Set WshShell = CreateObject("WScript.Shell")
Set oExec = WshShell.Exec("calc")' programma principale
' aka tua connessione
'Quando il programma principale termina vengono
' terminati anche i secondari
Set oExec1 = WshShell.Exec("notepad")' programma secondario
Set oExec2 = WshShell.Exec("Clipbrd")' programma secondario
'Set oExec3 >> ecc
WScript.Sleep 1500
WshShell.AppActivate("calcolatrice")
msgbox"prova a chiudere la calcolatrice"
'togli le tre rige sopra che servono come demo
Do While oExec.Status = 0
     WScript.Sleep 10
Loop
''WScript.Echo "status" &" >>>"& oExec.Status &"     "  &"Closed"
oExec1.Terminate()
oExec2.Terminate()
'Copia incolla su notepad e salva con estensione .vbs
'tutti i file (*.*)  poi ci clicchi sopra. (per esempio Test.vbs)
'se ti da' errore disattiva l'antivirus
--
Fosco

"Fosco"
In soldono intercetti la chiusura del tuo programma
che se lanciato con exec dara' una risposta tipo :
Dim WshShell, oExec
Set WshShell = CreateObject("WScript.Shell")
Set oExec = WshShell.Exec("calc")
Do While oExec.Status = 0
     WScript.Sleep 100
Loop
WScript.Echo "stato" & oExec.Status &"     "  &"programma chiuso"
' qui puoi avviare la procedura per lo shutdown del PC
--
Fosco

ti ringrazio ma non č che potresti spiegarmi passo passo magari per
mail?ci ho capito ben poco putroppo


 mail?ci ho capito ben poco putroppo
Meglio qui
spiegami che programma che lanci ... al posto di lanciarlo
a mano la sera lo lanci cosi
(diciamo che il tuo programma e' c:\programmi\la tele.exe)
Se tu lanci cosi'
Set WshShell = CreateObject("WScript.Shell")
Set oExec = WshShell.Exec("c:\programmi\la tele.exe")
Do While oExec.Status = 0
     WScript.Sleep 10
Loop
WScript.Echo "Closed"
' lo script sopra restare IBERNATO fino a che la tele.exe
'sara in funzione .. appena che la tele.exe sara' chiuso lo script continuera
'ad eseguire i comandi .. percio qui tu metterai qui la routine dello
'shutdown che ti ho indicato
'Per fare un test prova lo script sopra sostituendo c:\programmi\la tele.exe
'col tuo reale programma e vedi se quando lo chiudi scatta il messaggio
'Closed  ...  se si togli il messaggio e mettici la ruotine delle shutdown
' per testare lo script sopra copialo su notepad sotituisci c:\programmi\la tele.exe
col tuo REALE programma salvalo con estensione vbs NON txt per esempio
LaTele.vbs e prova a lanciarlo  dopo un po prova a chiudere a mano il
programma e vedi se ti appare il messaggio
--
Fosco

ma oltre a fare lo script e salvarlo cm .vbs devo anche usare un programma
esterno che lo faccia girare?
perche se lo faccio partire mi da errore subito..


 perche se lo faccio partire mi da errore subito..
Quando rispondi ad un post lascia almeno il nome a qui stai risondendo
(come faccio io qui per esempio) .. io per i miei post faccio una ricerca
e la tua reply mi era sfuggita e l'ho vista solo per caso
NO dovrebbe andare  prova a fere la prova del 9 e copia incolla
con lo stesso metodo e lancialo
dovrebbe dirti almeno che la versione e' 5.6 .****  se non [1]
ws = ScriptEngine & " Version " _
 & ScriptEngineMajorVersion & "." _
 & ScriptEngineMinorVersion _
 & "." & ScriptEngineBuildVersion
wscript.echo ws
'[1]
Download and install WSH 5.6 from here:
http://msdn.microsoft.com/downloads/list/webdev.asp
tips ed help
Questo sotto e' l'help del WSH con numerosi esempi ( sopra il mega)
http://www.microsoft.com/downloads/details.aspx?FamilyId=01592C48-207D-4BE1-8A76-1C4099D7BBB9&displaylang=en
http://download.microsoft.com/download/winscript56/Install/5.6/W982KMeXP/EN-US/scrdoc56en.exe
(tuttosuunarigasenononfungecopiaincollaunpezzopervolta)
-- 
Fosco

 perche se lo faccio partire mi da errore subito..
PS:
era utile la trascrizione dell'errore ..
-- 
Fosco 

 Fosco
Allora io lancio con un telecomando il processo PMC.exe e questo da quando
lo accendo resta sempre in esecuzione...io ora vorrei fare in modo che una
volta interrotto il processo (usando il telecomando) si spenga di
conseguenza anche il computer. Questo perche a volte la sera guardo la tv
sul letto e quando spegno la tv sul pc mi tocca rialzarmi e andare a
chiudere anche il computer...
io ho provato a lanciare l ultimo script che mi hai dato (quello che
doveva riconoscere la versione) ed č andato bene...
gli altri pero mi davano tutti errore:
"impossibile trovare il file specificato"
Grazie


> perche se lo faccio partire mi da errore subito..
se sei ancora interessato posta l'errore
e subito sotto apri lo script e copialo incollalo qui
che non me lo ricordo piu
-- 
Fosco