51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 2147|回复: 3
打印 上一主题 下一主题

[讨论] QTP自动化测试-登录测试脚本

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2016-6-12 11:19:14 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
本人最近在自学QTP自动化测试。根据QTP自带的测试登录例子编写了一个针对B/S应用的登录部分的测试脚本。以下是修改后的测试脚本。请大家多提宝贵的意见。谢谢!
Option Explicit

Dim url
url = "http://newtours.demoaut.com"

SystemUtil.Run "iexplore.exe",  url

Dim homeTitle
homeTitle = "Welcome: Mercury Tours"


Dim  excelUtil
Dim fileName,sheetName
Dim rowCount,rowNo
Dim userName,password,status
       
'读取Excel文件中的数据
fileName = "e:\login.xls"
sheetName="Global"
setExcelUtil excelUtil
rowCount = excelUtil.BuildRowHeading(fileName,sheetName)

For rowNo=0 To rowCount-1
  userName =  excelUtil.getCellData (rowNo,"Agent Name")
  password = excelUtil.getCellData (rowNo,"Password")  
  status = excelUtil.getCellData (rowNo,"Status")                 

  With  Browser("title:="&homeTitle).Page("title:="&homeTitle)
       .WebEdit("name:=userName").Set userName
       .WebEdit("name:=password").Set password
      .Image("name:=login").Click
  End With

  If  Browser("title:=Sign-on: Mercury Tours").Exist(10) and status="Fail" Then
     Reporter.ReportEvent  micFail,"登录失败: ","登录失败,用户名:"&userName&",密码:"&password
     Browser("title:=Sign-on: Mercury Tours").Link("name:=Home").Click
  Elseif  Browser("title:=Find a Flight: Mercury Tours:").Exist(10)  and status="Pass" Then
     Reporter.ReportEvent PASS,"登录成功: ","成功"
     Browser("title:=Find a Flight: Mercury Tours:").Link("name:=Home").Click
  Else
     Reporter.ReportEvent Fail,"Login: ","Combination #  was not according to Excel file"          
  End If
               
Next
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

  • TA的每日心情
    奋斗
    7 小时前
  • 签到天数: 2811 天

    连续签到: 4 天

    [LV.Master]测试大本营

    2#
    发表于 2016-6-12 15:59:11 | 只看该作者
    感觉自动化思路是通用的,但是一般脚本都是要变得,
    支持分享
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    开心
    2018-4-10 11:16
  • 签到天数: 92 天

    连续签到: 1 天

    [LV.6]测试旅长

    3#
    发表于 2016-6-12 16:47:20 | 只看该作者
    感觉好像惠普培训的内容
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    4#
     楼主| 发表于 2016-6-13 08:21:06 | 只看该作者
    jingzizx 发表于 2016-6-12 15:59
    感觉自动化思路是通用的,但是一般脚本都是要变得,
    支持分享

    非常感谢jingzizx的回复。感觉自动化测试的思路应该是一样的,只是在实现时使用的工具不同,脚本要发生相应的变化。
    好的测试脚本的一个特征应该是可重用。对于任何一个web系统来说,登录应该是差不多的。测试脚本应该有很大的通用性。但是上面的脚本,感觉可用性较差(和被测系统绑定了),不知道怎么修改脚本,才能让它适用在不同的系统中。这些都是我个人的一些观点,不当之处,敬请指正。谢谢!
    回复 支持 反对

    使用道具 举报

    本版积分规则

    关闭

    站长推荐上一条 /1 下一条

    小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

    GMT+8, 2024-11-14 15:19 , Processed in 0.064871 second(s), 22 queries .

    Powered by Discuz! X3.2

    © 2001-2024 Comsenz Inc.

    快速回复 返回顶部 返回列表