by Mike G (7 Submissions)
Category: Windows System Services
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Tue 9th January 2001
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Easy Lock win 2000 workstation with or without API
Private Sub cmdAPI_Click()
Call LockWorkStation
End Sub
Private Sub cmdShell_Click()
Call Shell("rundll32 user32.dll,LockWorkStation ", vbNormalFocus)
End Sub