Task Kill v0.1, Task Kill v0.1 by King D34m0n

« Older Newer »

KiNg D34m0n

Posted on 8/8/2010, 17:56

Ciao a tutti, ho creato questo semplice script che permette di terminare i processi attivi!!! dite cosa ne pensatee!!!!

Source:

SPOILER (click to view)

#include <buttonconstants.au3>
#include <editconstants.au3>
#include <guiconstantsex.au3>
#include <windowsconstants.au3>

$Form1 = GUICreate("Task Kill v0.1", 274, 298, 206, 133)
$Input1 = GUICtrlCreateInput("New process", 144, 13, 121, 22)
$Button1 = GUICtrlCreateButton("Open new preocess", 144, 43, 121, 25, $WS_GROUP)
$List1 = GUICtrlCreateList("", 8, 44, 129, 225)
$Button2 = GUICtrlCreateButton("Close process", 144, 74, 121, 25, $WS_GROUP)
$Button4 = GUICtrlCreateButton("Task List", 8, 11, 129, 25, $WS_GROUP)
$File = GUICtrlCreateMenu("File")
$Exit = GUICtrlCreateMenuItem ("Esci",$file)
$credits = GUICtrlCreateMenu("Credits")
$King = GUICtrlCreateMenuItem("About", $credits)
GUISetState(@SW_SHOW)

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button4
$list2=ProcessList()
guictrlsetdata($List1,$list2)
for $i = 1 to $list2[0][0]
GUICtrlSetData($List1,$list2[$i][0])
Next
$list = ProcessList()
Case $Button2
$var= guictrlread($List1)
ProcessClose($var)
$list = ProcessList()
Case $Button1
$var2 = GUICtrlRead($Input1)
FileOpen ($var2)
$list = ProcessList()
Case $Exit
Exit
Case $King
MsgBox (0, "Task Kill v0.1", "Released by King D34m0n"&@lf&@lf&"CopyRight Creative Commons"&@lf&@lf&"(tutti i diritti riservati)")
EndSwitch
WEnd

Vorrei anche aggiungere una funzione per terminare i processi di sistema e l'aggiornamento automatico della lista!!! mi potete dare una mano per questo???

Ciaoooooo a tutti!!!!

xMasteRx

Posted on 8/8/2010, 18:04

l'o fatto in qualche secondo per te (:
se non capisci qualcosa dimmelo XD

PS: Ma che vuoi fare chiudendo i processi di sistema? O.O HAHAAH, comunque quello è un po impossibile da fare, magari chiamando qualche DLL di windows, ma non lo so... dovrei cercare, anche se chiudere i processi di sistema non ha senso XD

SPOILER (click to view)

CODICE

#include <buttonconstants.au3>
#include <editconstants.au3>
#include <guiconstantsex.au3>
#include <windowsconstants.au3>

$Form1 = GUICreate("Task Kill v0.1", 274, 298, 206, 133)
$Input1 = GUICtrlCreateInput("New process", 144, 13, 121, 22)
$Button1 = GUICtrlCreateButton("Open new preocess", 144, 43, 121, 25, $WS_GROUP)
$List1 = GUICtrlCreateList("", 8, 44, 129, 225)
$Button2 = GUICtrlCreateButton("Close process", 144, 74, 121, 25, $WS_GROUP)
$Button4 = GUICtrlCreateButton("Task List", 8, 11, 129, 25, $WS_GROUP)
$CheckBox1 = GUICtrlCreateCheckbox("Auto refresh", 144, 105, 121, 25)
$File = GUICtrlCreateMenu("File")
$Exit = GUICtrlCreateMenuItem ("Esci",$file)
$credits = GUICtrlCreateMenu("Credits")
$King = GUICtrlCreateMenuItem("About", $credits)
GUISetState(@SW_SHOW)

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button4
ProcessRefresh()
Case $Button2
$var= guictrlread($List1)
ProcessClose($var)
$list = ProcessList()
Case $Button1
$var2 = GUICtrlRead($Input1)
FileOpen ($var2)
$list = ProcessList()
Case $CheckBox1
If GUICtrlRead($CheckBox1)=$GUI_CHECKED Then
AdlibRegister("ProcessRefresh", 1000)
Else
AdlibUnRegister("ProcessRefresh")
EndIf
Case $Exit
Exit
Case $King
MsgBox (0, "Task Kill v0.1", "Released by King D34m0n"&@lf&@lf&"CopyRight Creative Commons"&@lf&@lf&"(tutti i diritti riservati)")
EndSwitch
WEnd

Func ProcessRefresh()
$list2=ProcessList()
guictrlsetdata($List1,$list2)
for $i = 1 to $list2[0][0]
GUICtrlSetData($List1,$list2[$i][0])
Next
$list = ProcessList()
EndFunc

KiNg D34m0n

Posted on 8/8/2010, 18:17

Ok adesso funziona tutto grazie mille sei stato chiarissimo!!! vorrei anke aggiungere un grafico che mi visualizza l'utilizzo di cpu è possibile farlo in autoit???

ps: come faccio ad aprire un nuovo processo???

ciaoooo!!!

xMasteRx

Posted on 8/8/2010, 18:20

CITAZIONE (KiNg D34m0n @ 8/8/2010, 19:17)

beh se è per quello guarda il mio programma, ResourceUseAdvanced, è completamente fatto in AutoIt, leggi il source e prova a farti qualcosa di simile

non mi copiare però eh HAHA (:

per aprire il processo hai messo
Case $Button1
$var2 = GUICtrlRead($Input1)
FileOpen ($var2)

devi invece mettere
Case $Button1
$var2 = GUICtrlRead($Input1)
Run ($var2)

oppure

Case $Button1
$var2 = GUICtrlRead($Input1)
ShellExecute ($var2)

KiNg D34m0n

Posted on 8/8/2010, 18:21

Ok grazieee milleee, chiarissimoo!!! Cmq vai tranquillo non ti copio!!!!

Ahahahah

xMasteRx

Posted on 8/8/2010, 18:23

CITAZIONE (KiNg D34m0n @ 8/8/2010, 19:21)

Ok grazieee milleee, chiarissimoo!!! Cmq vai tranquillo non ti copio!!!!

Ahahahah

Prego,

sempre a disposizione, per qualsiasi dubbio basta chiedere² :woot:

Gianlu-thebest

Posted on 8/8/2010, 19:04

Beh, su windows XP se sei admin, puoi chiudere pure il buco nel...la tua bocca!

ACIDBURN16

Posted on 8/8/2010, 22:59

CITAZIONE (xMasteRx @ 8/8/2010, 19:20)

CITAZIONE (KiNg D34m0n @ 8/8/2010, 19:17)

beh se è per quello guarda il mio programma, ResourceUseAdvanced, è completamente fatto in AutoIt, leggi il source e prova a farti qualcosa di simile

Secondo me a te ti avranno rubato qualche source xD, è troppo il trauma che ti è rimasto xD.

xMasteRx

Posted on 8/8/2010, 23:35

CITAZIONE (ACIDBURN16 @ 8/8/2010, 23:59)

CITAZIONE (xMasteRx @ 8/8/2010, 19:20)

beh se è per quello guarda il mio programma, ResourceUseAdvanced, è completamente fatto in AutoIt, leggi il source e prova a farti qualcosa di simile

Secondo me a te ti avranno rubato qualche source xD, è troppo il trauma che ti è rimasto xD.

HAHAHAHA, si infatti mi hanno gia rubato un source

ma fa niente, io gliel'o detto tanto perché impari a usare autoit, invece che lammerare (: ormai me ne frego se mi rubano il codice XD tanto, che ci perdo?
e inoltre, molte volte i lammer so cosi nabbi che non sanno nemmeno togliere le credenziali XD

8 replies since 8/8/2010, 17:56 167 views