Lock Current Machine

'Create Shell Object
Set wsh= CreateObject("Wscript.Shell")


'Run user32.dll with argument Lockworkstation
wsh.run "rundll32.exe user32.dll, LockWorkStation"

Output
======

- Machine will be locked