Predmet:Re: Ili možda isto sa VBA
PreuzmiIzvorni kôd (Visual Basic):Function ZatvoriProgram(Imeprograma)
Dim WO As Object
Dim ProcesO
Set WO = GetObject("winmgmts:")
Set ProcesO = WO.execquery("SELECT * FROM win32_process WHERE Name = '" & Imeprograma & "'")
For Each ProcesO In ProcesO
ProcesO.Terminate
Next
End Function
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.