VB.NET Görev Yöneticisini Kilitleme Programı kodları


Visual Basic ve .NET Framework    Visual Basic ve .NET Framework İle İlgili Paylaşım Kategorisi

Yazar: GardenWall    0 Yorum    94 Görüntüleme
  • 0 Oy - 0 Yüzde

Paylaşım Tarihi: 30.07.2016, 22:43:59 #1
GardenWall EFSANE
Onaylı Uye
Status: Çevrimdışı Yorum Sayısı:200 Konu Sayısı:60 Üyelik Tarihi:17.11.2015 Rep Puanı: 43

linkleri görmek için giriş yapmanız. Yada üye olmanız gerekir.

Kod:
Imports Microsoft.Win32 'register için
Public Class Form1

   Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
       Try
           Dim reg As Microsoft.Win32.RegistryKey
           Dim subKey As String = "Software\Microsoft\Windows\CurrentVersion\Policies\System"

           reg = Microsoft.Win32.Registry.CurrentUser.CreateSubKey(subKey)
           reg.SetValue("DisableTaskMgr", "1")
           reg.Close()
       Catch ex As Exception
           MessageBox.Show(ex.Message)
       End Try
   End Sub

   Private Sub Form1_FormClosing(sender As Object, e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
       Try
           Dim reg As Microsoft.Win32.RegistryKey
           Dim subKey As String = "Software\Microsoft\Windows\CurrentVersion\Policies\System"

           reg = Microsoft.Win32.Registry.CurrentUser.CreateSubKey(subKey)
           reg.DeleteValue("DisableTaskMgr")
           reg.SetValue("DisableTaskMgr", 0)

           reg.Close()
       Catch ex As Exception
           MessageBox.Show(ex.Message)
       End Try
   End Sub

   Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
       Dim info As New ProcessStartInfo("taskmgr.exe")
       Process.Start(info)
   End Sub
 
End Class









Aradığınızı Bulamadınız Mı ?

Konuyu görüntüleyenler:
1 Misafir