• Home
 · 
• Windows System Services
 · 
• Disables / Enables Ctrl-Alt-Delete

Disables / Enables Ctrl-Alt-Delete

Disables / Enables Ctrl-Alt-Delete

Rate Disables / Enables Ctrl-Alt-Delete

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

Public Const SCREENSAVERRUNNING = 97

Public Sub Disable_Ctrl_Alt_Del()
    On Error Resume Next
    Dim lResult As Long
    Dim bBoolean As Boolean
    lResult = SystemParametersInfo(SCREENSAVERRUNNING, True, bBoolean, 0)
End Sub

Public Sub Enable_Ctrl_Alt_Del()
    On Error Resume Next
    Dim lResult As Long
    Dim bBoolean As Boolean
    lResult = SystemParametersInfo(SCREENSAVERRUNNING, False, bBoolean, 0)
End Sub