by Brandon Johnson (7 Submissions)
Category: Encryption
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Sun 6th August 2000
Date Added: Mon 8th February 2021
Rating: (1 Votes)
This Will Hide Any Application You Put This Code In From The Ctrl + Alt + Del List.
API Declarations
Private Const RSP_SIMPLE_SERVICE = 1
Private Const RSP_UNREGISTER_SERVICE = 0
Private Declare Function GetCurrentProcessId Lib "kernel32" () As Long
Private Declare Function RegisterServiceProcess Lib "kernel32" _
(ByVal dwProcessID As Long, ByVal dwType As Long) As Long
Private Declare Function GetCurrentProcess Lib "kernel32" () As Long
Dim lngProcessID As Long
Dim lngReturn As Long
lngProcessID = GetCurrentProcessId()
If lbValue Then
lngReturn = RegisterServiceProcess(pid, RSP_SIMPLE_SERVICE)
Else
lngReturn = RegisterServiceProcess(pid, RSP_UNREGISTER_SERVICE)
End If
End Sub
No comments have been posted about This Will Hide Any Application You Put This Code In From The Ctrl + Alt + Del List.. Why not be the first to post a comment about This Will Hide Any Application You Put This Code In From The Ctrl + Alt + Del List..