Açık Olan İşlemi Kapatmak

İpucu

Son Cevaplar gön: Anonim 11 yıl önce

3 Yazılar

2 Üyeler

0 Reactions

401 Görüntüleme

RSS

Anonim

(@Anonim)

Gönderiler: 0

Konu başlatıcı

[b]Görev Yöneticisinde[/b] açık olan bir işlemi kapatmak için bu kodları kullanabilirsiniz...

[b]EXCEL.EXE[/b] yerine, kapatmak istediğiniz işlem adını yazınız.

Sub Programı_Kapat()
    Dim NameSpace As Object, Classes As Object, Program As Object
    Set NameSpace = GetObject("winmgmts:\\" & "." & "\root\CIMV2")
    Set Classes = NameSpace.ExecQuery("SELECT Name FROM Win32_Process", , 48)
    For Each Program In Classes
        If Program.Name = "[b]EXCEL.EXE[/b]" Then
            Program.Terminate 0
        End If
    Next
    Set NameSpace = Nothing: Set Classes = Nothing: Set Program = Nothing
End Sub

Hoşça kalın ! --)(

Gönderildi : 16/11/2013 16:06

Rıza ŞAHAN

(@riza-sahan)

Gönderiler: 18034

Güzel paylaşım için teşekkürler.

1984 doğumluyum. 4 yaşından bu yana İstanbul’da yaşıyorum. Sırası ile aşağıdaki okullarda eğitim gördüm. Paşaköy ilkokulu (1990-1995) Kartal Zekeriyya Güçer İlköğretim Okulu(1995-1998) Ümraniye Teknik ve Endüstri Meslek Lisesi Bilgisayar Bölümü(1998-2001) Kocaeli Üniversitesi Bilgisayar Programcılığı(2002-2004) Anadolu Ünv. İşletme Fakültesi(2006-2009) Lise yıllarından sonra bir bilgisayar firmasının teknik servisinde mesleğe merhaba dedim. Outsource olarak Citibank ytl ve bina taşınma projesinde yer alarak 8 ay görev yaptım. Bu görevden sonra şu an çalışmakta olduğum yerde bilgi işlem sorumlusu olarak göreve başladım ve 18 yıldır görevimin başındayım.

Gönderildi : 17/11/2013 00:30