TA的每日心情 | 奋斗 2017-8-10 10:15 |
---|
签到天数: 62 天 连续签到: 3 天 [LV.6]测试旅长
|
'生产环境地址
'systemutil.run "Iexplore.exe","https://pay.ips.com.cn/icpay/test/testicpay.aspx"
Browser("Browser").Dialog("安全警报").WinButton("是(Y)").Click
Browser("Browser").Page("模拟测试页面").WebEdit("pMerCode").Set DataTable("visa", dtGlobalSheet)
'Browser("Browser").Page("模拟测试页面").WebEdit("pMerVersion").Set "2.1.0"
Browser("Browser").Page("模拟测试页面").WebList("pMerFraudGuard").Select "内部不进行反欺诈验证"
Browser("Browser").Page("模拟测试页面").WebButton("以XML提交").Click
Browser("Browser").Page("环迅支付").WebRadioGroup("rdCardList").Check CheckPoint("rdCardList")
If Browser("Browser").Page("环迅支付").WebRadioGroup("rdCardList").Exist Then
reporter.ReportEvent micPass,"参数检查","参数显示正确"
else
reporter.ReportEvent 3,"参数检查","参数显示不正确"
Browser("Browser").Page("环迅支付").Sync
Browser("Browser").Close
End If
Browser("Browser").Page("环迅支付").WebRadioGroup("rdCardList").Select "01005"
Browser("Browser").Page("环迅支付").WebEdit("txtCardNo").Set "4392 2600 1555 5558"
'Browser("Browser").Dialog("招商银行一网通网盾").Close
Browser("Browser").Page("环迅支付").WebEdit("txtCardHolderName").Set "JackWu"
Browser("Browser").Page("环迅支付").WebList("ddlMonth").Select "09"
Browser("Browser").Page("环迅支付").WebList("ddlYear").Select "2013"
Browser("Browser").Page("环迅支付").WebEdit("txtCvv").Set "755"
Browser("Browser").Page("环迅支付").WebEdit("txtStreet").Set "shanghai"
Browser("Browser").Page("环迅支付").WebEdit("txtCity").Set "shanghai"
Browser("Browser").Page("环迅支付").WebEdit("txtZipCode").Set "200023"
Browser("Browser").Page("环迅支付").WebEdit("txtPhone").Set "15221635280"
Browser("Browser").Page("环迅支付").WebEdit("txtEmail").Set "qxia@ips.com.cn"
Browser("Browser").Page("环迅支付").WebEdit("txtCardProvider").Set "中国银行"
Browser("Browser").Page("环迅支付").WebButton("确认付款").Click
'Browser("Browser").Dialog("招商银行一网通网盾").WinButton("继续").Click
'Browser("Browser").Dialog("安全警报").Click 109,245
Browser("Browser").Dialog("安全警报").WinButton("是(Y)").Click
wait(5)
Browser("Browser").Page("PAPasswd").WebElement("badjack").Check CheckPoint("badjack")
if Browser("Browser").Page("PAPasswd").WebElement("badjack").Exist Then
reporter.ReportEvent micPass,"参数检查","参数显示正确"
else
reporter.ReportEvent micPass,"参数检查","参数显示不正确"
End If
Browser("Browser").Page("PAPasswd").Sync
Browser("Browser").Close |
|