yurui829 发表于 2010-6-21 17:49:45

读写配置文件(.ini)

在一个QTP framework中,不可避免的要用到配置文件(.ini), 如何简单快捷的读写配置文件呢,我们可以通过两个API函数来控制。

例如:配置文件在D:\Project\Test\Test.ini目录下, 格式如下:

Test=Value1
Test2=

可以通过以下语句来给配置文件中Test赋值, 参数不介绍了,一看就懂。
Extern.Declare micInteger,"WritePrivateProfileString","kernel32.dll","WritePrivateProfileStringA",micString,micString,micString,micString
Ret = Extern.WritePrivateProfileString("Automation", "Test", "Value1", "D:\Project\Test\Test.ini")


可以通过以下语句来读取配置文件中Test的值:
Extern.Declare micLong,"GetPrivateProfileString","kernel32","GetPrivateProfileStringA",micString, micString, micString, micString+micByRef, micLong, micString
Dim outparamter
Ret = Left(outparamter, Extern.GetPrivateProfileString("Automation", "Test", "", outparamter, 255, "D:\Project\Test\Test.ini"))
第三个参数指定的条目没有找到时返回的默认值。可设为空("")
第四个参数指定一个字串缓冲区,用来存储读取的值
第五个参数指定装载到outparamter缓冲区的最大字符数量
返回值为outparamter缓冲区的字节数量

为方便期间,可以写成两个函数。

k4124k 发表于 2010-6-21 22:07:29

总结:
QTP可以调用win32 API
页: [1]
查看完整版本: 读写配置文件(.ini)