关于QTP中保存test时"General Error while saving the test"的解决办法

今天录制了一个脚本,保存文件时,提示"General Error while saving the test"。

在网上搜索了一下，kernzhang的blog中有介绍到解决该问题的办法，参照总结了一下：

1、先定位问题： 把如下脚本拷贝到QTP的Expert View中，运行一下

   Dim fso, MyFile
   Set fso = CreateObject("scrīpting.FileSystemObject")
   Set MyFile = fso.CreateTextFile("C:\testfile.txt", True)
   MyFile.WriteLine ("This is a test")
   MyFile.WriteLine ("This is another test")
   MyFile.Close

出现提示：ActiveX 部件不能创建对象: 'scrīpting.filesystemobject' ，可以确定是操作系统中ActiveX控件问题造成的

2、重新注册Scrrun.dll:

查找system32目录下是否存在文件：Scrrun.dll,如果不存在，从别处拷贝一份过来。

在CMD命令行状态输入以下命令：

关闭命令：RegSvr32 /u C:\WINNT\SYSTEM32\scrrun.dll

打开命令：RegSvr32 C:\WINNT\SYSTEM32\scrrun.dll