qtp11破解方法及试用30天的脚本

《qtp11破解方法及试用30天的脚本》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、QTP11循环试用30天的破解方法。?XP下：1、找到以下路径：C:DocumentsandSettingsAllUsersApplicationDataSafeNetSentinel，将SafeNetSentinel删除或者更名。注意做好备份。2、找到QTP11的安装目录下的bin子目录，双击执行instdemo.exe文件。注意，执行instdemo.exe安装文件时可能没有任何显示的反应，其实是已经执行了。这时你可以看一下第一步中的目录，SafeNetSentinel文件夹又出现了。?Win7下：1、找到以下路径C:ProgramDataSafeN

2、etSentinel，更名或者删除，注意做好备份。2、同上?XP下和Win7下破解方法是一样的，只不过路径不同。?注意，以上路径可能是隐藏文件或者是受保护的系统文件，请确保能正常查看，请查看此文章怎么打开隐藏文件？?执行以上两个步骤后，再打开QTP11版本即可恢复30天免费试用。vbs脚本：delfolder="C:ProgramDataSafeNetSentinel"delfolder1="C:DocumentsandSettingsAllUsersApplicationDataSafeNetSentinel"filepath="C:ProgramF

3、ilesHPUnifiedFunctionalTestingbininstdemo.exe"Setfso=WScript.CreateObject("Scripting.Filesystemobject")SetWshShell=WScript.CreateObject("Wscript.Shell")ret=fso.FolderExists(delfolder)ret1=fso.FolderExists(delfolder1)ret2=fso.FileExists(filepath)IfretThenSetGet_folder=fso.GetFolder(

4、delfolder)Get_folder.DeleteElseIfret1thenSetGet_folder=fso.GetFolder(delfolder1)Get_folder.DeleteElseEndIfEndIfIfret2ThenWshShell.ExecfilepathMsgBox"success!"Elsedofilepath=InputBox("请输入UFT安装路径中bin文件夹的完整路径","参数输入","C:ProgramFilesHPUnifiedFunctionalTestingbin")Iffilepath<>""thenIfD

5、oSet(filepath,WshShell)thenExitdoElseEndIfElseExitdoEndIfloopEndIfSetGet_folder=NothingSetWshShell=NothingSetfso=NothingFunctionDoSet(filepath,WshShell)check=right(filepath,1)Ifcheck=""thenfilepath=filepath&"instdemo.exe"Elsefilepath=filepath&"instdemo.exe"EndIfret3=fso.FileExists(fi

6、lepath)Ifret3thenWshShell.ExecfilepathMsgBox"success!"DoSet=trueElseMsgBox"输入的路径下不存在instdemo.exe"DoSet=falseEndIfEndFunction