اكواد تعطيل وتفعيل مدير المهام

اكواد تعطيل وتفعيل مدير المهام vb6

اكودا عبارة عن تعطيل وتفعيل  Alt+ctrl+del 

مدير المهام 

للتعطيل 

Dim WSH As Object

Set WSH = CreateObject("Wscript.Shell")

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

للتفعيل 

Dim WSH As Object

Set WSH = CreateObject("Wscript.Shell")

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

انتهى