用QTP调用VB6生成的DLL实例

    有些时候调用DLL会简化测试脚本的编写过程，例如开发人员那边积累了很多成熟的、经过测试和使用的类库，封装了很多很好用的功能，例如读写注册表、Excel文件、数据库，或者是上传下载组件、日期计算等，而我们在写自动化测试脚本时如果也需要这些功能的话，就没必要自己花时间写，充分发挥“拿来主义”，直接调用这些DLL就可以了。

      方法如下：

首先，打开VB，新建一个ActiveDLL：

 

写入以下代码：

 

然后在（文件）菜单选择“生成PrjName.dll”。然后就可以在QTP里进行调用了。

假设此时把PrjName.dll改名了FileName.dll，如果此文件不是QTP所在机器生成的，需要用运行 regsvr32 进行注册（如运行regsvr32 f:\FileName.dll）。

    撤销注册运行 regsvr32 /u f:\FileName.dll 。

 

然后直接在QTP里用CreateObject进行调用即可：

 

如此简直，就实在了QTP调用DLL。

当然，也可以用来声明非托管的动态链接库和API函数。