自动化测试中调用DLL

+S|
RS0v"de0首先说说自动化测试中调用DLL的作用吧：
*o;?].ewyP0写DLL可以将通用功能进行封装,该DLL可以被任何自动化测试工具使用,只要支持DLL即可,另一个目的是保护版权

.C&o"]&x
P ] [0下面针对QTP和开源测试框架watir + ruby中调用DLL分别说明：

Ruby51Testing软件测试网@cQ7LR9^

0n#K\%P Mx%t%Z0在ruby的开源项目中，Win32Api这个gem可以实现我们需要的功能。通过以下方法 ，我们就可以调用外部dll中的函数。

{V!` a S#U7RX0Win32Api.new(dllname, proc, import, export)51Testing软件测试网7^3[&} V
t8K#D

参数说明51Testing软件测试网?$OR"F
Z#eOz qV;I

dllname:dll文件的名字，如果想只写dll的名字，可以将dll放到system32目录或者当前目录下，或者写上dll文件所在的路径

(o1t9o ec0proc: dll中函数的名字51Testing软件测试网1uZ4oqK;K;Y!m

7P kNG(@$|ZV0import：函数传入参数的参数类型，其中 "p" 对应指针，"n","l"对应long，"i"对应int，"v" 对应void，如果有多个参数，可以通过 ["p","n"]数组的方式来实现，其中置为nil可以表示没有参数

export：函数的返回值类型，参数类型同上51Testing软件测试网 m1Y8]9b"[cDH1O9E

5hv#{_y;T`0Win32API#call([args ...])

SsW1oP6Z!Dl\X0调用dll中的函数，参数和返回值应该与new申明中的一致，如果返回一个指针，需要事前初始化，否则可能会有内存溢出问题。51Testing软件测试网.O5D!_0t&bQ(VP

例子:

mGld'DK!AA0[0有个dll的头文件的申明为:

Glj5V4f? i;Q&[f0extern "C" long PASCAL EXPORT BMPToJPG(char *jpg,char *bmp);51Testing软件测试网)xI,x qOC|C:X
那么在将指定的dll文件放在当前目录，ruby代码如下51Testing软件测试网za D
cON]sl!k

require 'rubygems'51Testing软件测试网5@w3~9Mp&Odj

/}&m R?v/gY/w0require 'Win32Api'

JPG=Win32API.new(File.dirname(__FILE__)+"\\JpgDll.dll","BmpToJpg",["p","p"],"l")

1lzu"n6v"l0lj0JPG.call("D:\\1.bmp","D:\\1.jpg")
th5ns'`;R(|0 
GQ0KJmQO,Sy6t'p0执行上述代码后，就能把D盘下的1.bmp文件另存为 1.jpg文件

gmr1?P,l0 

n4wf&{{"vSw9k0QTP

QTP拥有自己的.NET Factory接口，以调用.NET生成的DLL，也可以使用Extern.Declare来进行外部的DLL的访问。51Testing软件测试网{\(vvz2b}

语法：

Extern.Declare(RetType,MethodName,LibName,Alias[,ArgType(s)])

参数说明

RetType: 方法返回值的类型

MethodName：调用DLL文件中的某个方法的方法名51Testing软件测试网af#{(vS

0_(|G*W-fi(Td|0LibName:DLL文件名51Testing软件测试网'i_I'Z$d,vDsM2a

Alias: 别名，当别名为空时，方法名和别名一样(此参数通常为空)51Testing软件测试网h5B&CZ/[wv m8wd,Uy

ArgType(s): 传入的参数

w;]7s\4B"cM?z0例子：51Testing软件测试网j/Q~v-ST,g

Extern.Declare micInteger,"TuxCALL","D:\AutomationTest\Lib\MyDll.dll","",micString,micString

nzh8k6F*b x4r~0Msgbox Extern.TuxCALL("A","B")51Testing软件测试网pru#us3p%W