visual basic Code to disable and activate the task manager ~ Visual Basic

الاثنين، 7 يوليو 2014

visual basic Code to disable and activate the task manager

put two command putton on form

Private Sub Command1_Click()

Dim WSH As Object

Set WSH = CreateObject("Wscript.Shell")

WSH.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr", 0, "REG_DWORD"

Me.Caption = "! Task Manager is: Enabled !"

End Sub

Private Sub Command2_Click()

Dim WSH As Object

Set WSH = CreateObject("Wscript.Shell")

WSH.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr", 1, "REG_DWORD"

Me.Caption = "! Task Manager is: Disabled !"

End Sub

Interpreter and redeployed from vb4arb

Please Give Us Your 1 Minute In Sharing This Post!

SOCIALIZE IT →