2010年12月07日   码农之路   6,632 次浏览

   使用QTP进行自动化测试时,对于测试数据可存放在Excel文件中,再在测试脚本中编写VBS脚本将数据读取到QTP中,如下:

       ’新建Data.xls文件,将该文件Sheet1标签页中的内容传到QTP的Global表中
         datatable.ImportSheet “D:\Data.xls”,”Sheet1″,”Global”
         Dim dtvalue,dtsheet
     ’设置Global为当前使用的Sheet页
       set dtSheet = datatable.GetSheet(“Global”)

     ’循环赋值
     for i = 0 to dtsheet.getrowcount

    ’循环获取Global页的值
    dtvalue = datatable(“SelectItem”,”Global”)

    ’将每次获取的值写入到页面选择框billCountry中
     Browser(“Book a Flight:Mercury”).page(“Book a Flight:Mercury”).WebLIst(“billCountry”).Select dtvalue
    dtsheet.setnextrow
    Next

    ’清除Global表中数据
    datatable.ImportSheet “D:\Data.xls”,”Sheet2″,”Global”

这样就可以实现将excel中的数据读取到QTP的datatable中,在运行时可方便的将datatable中的数据取出来进行测试。

赞 赏
申明:除非注明,本站文章均为原创,转载请以链接形式标明本文地址。 如有问题,请于一周内与本站联系,本站将在第一时间对相关内容进行处理。
本文地址: http://www.yyjjssnn.cn/articles/630.html
相关阅读: QTP

>>> Hello World <<<

这篇内容是否帮助到你了呢?

如果你有任何疑问或有建议留给其他朋友,都可以给我留言。

:wink: :twisted: :surprised: :smile: :smile9: :smile8: :smile7: :smile6: :smile5: :smile56: :smile55: :smile54: :smile53: :smile52: :smile51: :smile50: :smile4: :smile49: :smile48: :smile47: :smile46: :smile45: :smile44: :smile43: :smile42: :smile41: :smile40: :smile3: :smile39: :smile38: :smile37: :smile36: :smile35: :smile34: :smile33: :smile32: :smile31: :smile30: :smile2: :smile29: :smile28: :smile27: :smile26: :smile25: :smile24: :smile23: :smile22: :smile21: :smile20: :smile1: :smile19: :smile18: :smile17: :smile16: :smile15: :smile14: :smile13: :smile12: :smile11: :smile10: :smile0: :sad: :rolleyes1: :redface: :razz: :question: :neutral: :mrgreen: :mad: :lol: :idea: :exclaim: :evil: :eek: :cry: :cool: :confused: :biggrin: :arrow:

友情链接: 程序员刘杨 刘杨
Copyright 2003~2018 保留所有权利 | 网站地图
备案号:湘ICP备14001005号-2

湘公网安备 43011102001322号