set wmi = getobject("winmgmts:")
wql = "select * from Win32_Process " _
& " where (name='diaspora.exe' or name='Xiaspora.exe' or name='Bulga5.exe')"
set results = wmi.execquery(wql)
msgbox "Siguren li si che iskash da spresh *Sporata?",,"Potvardi"
for each app in results
app.terminate
next