Lock your system after execution of your QTP Script ~ Quick Test Professional

Friday, April 10, 2009

6:31 AM -

Advanced QTP,QTP,VB Script,What's New in QTP

Lock your system after execution of your QTP Script

Public Function Lock_your_system()
Set obj = CreateObject("WScript.Shell")
sCmnd = "%windir%\SYSTEM32\rundll32.exe user32.dll,LockWorkStation"
obj.Run sCmnd, 0, False
End Function

Friday, April 10, 2009

0 comments: