多测师是一家拥有先进的教学理念,强大的师资团队,业内好评甚多的接口自动化测试培训机构!

17727591462

联系电话

您现在所在位置:接口自动化测试培训 > 新闻资讯

QTP图片验证/图片比较/二进制流对比法

更新时间:2022-05-27 09:06:58 作者:多测师 浏览:83

  图片验证主要是文件对比,其中我们可以利用二进制的方法读取图片信息,然后进行对比,达到对比的效果,本例子利用fso对象的文件流的方法实现,代码如下:

QTP图片验证/图片比较/二进制流对比法

  Public Function CompareFiles (FilePath1, FilePath2)

  Dim FS, File1, File2

  Set FS = CreateObject("scrīpting.FileSystemObject")

  If FS.GetFile(FilePath1).Size <> FS.GetFile(FilePath2).Size Then

  CompareFiles = True

  Exit Function

  End If

  Set File1 = FS.GetFile(FilePath1).OpenAsTextStream(1, 0)

  Set File2 = FS.GetFile(FilePath2).OpenAsTextStream(1, 0)

  CompareFiles = False

  Do While File1.AtEndOfStream = False

  Str1 = File1.Read(1000)

  Str2 = File2.Read(1000)

  CompareFiles = StrComp(Str1, Str2, 0)

  If CompareFiles <> 0 Then

  CompareFiles = True

  Exit Do

  End If

  Loop

  File1.Close()

  File2.Close()

  End Function

  返回值:

  如果两个文件相同,该功能将返回 0 或 False,否则将返回 True。

  示例:

  File1 = "C:\1.jpg"

  File2 = "C:\2.jpg"

  If CompareFiles(File1, File2) = False Then

  MsgBox "Files are identical."

  Else

  MsgBox "Files are different."

  End If

  以上内容为大家介绍了自动化测试中的QTP图片验证/图片比较/二进制流对比法,本文由多测师亲自撰写,希望对大家有所帮助。了解更多自动化测试相关知识:https://www.aichudan.com/xwzx/

联系电话

17727591462

返回顶部