qtp运行脚本错误
Browser("Heimdall DLP数据泄漏防护系统 V2.2").Page("Heimdall DLP数据泄漏防护系统 V2.2").Frame("OperateArea").WebEdit("loginName").Set "admin"Browser("Heimdall DLP数据泄漏防护系统 V2.2").Page("Heimdall DLP数据泄漏防护系统 V2.2").Frame("OperateArea").WebEdit("password").SetSecure "4d1c36f1d74364346d247db14a0b30b68a7cd48b6fe2"
Browser("Heimdall DLP数据泄漏防护系统 V2.2").Page("Heimdall DLP数据泄漏防护系统 V2.2").Frame("OperateArea").WebButton("提交").Click
Browser("Heimdall DLP数据泄漏防护系统 V2.2").Page("Heimdall DLP数据泄漏防护系统 V2.2_2").Frame("main").Link("部门管理").Click
Dim bm
bm=DataTable.GetCurrentRow
For i=bm to DataTable.GetRowCount
DataTable.setCurrentRow(i)
Browser("Heimdall DLP数据泄漏防护系统 V2.2").Page("Heimdall DLP数据泄漏防护系统 V2.2_2").Frame("subContent").WebElement("hongan").Click
Browser("Heimdall DLP数据泄漏防护系统 V2.2").Page("Heimdall DLP数据泄漏防护系统 V2.2_2").Frame("subContent").WebButton("增加新部门").Click
Browser("Heimdall DLP数据泄漏防护系统 V2.2").Page("Heimdall DLP数据泄漏防护系统 V2.2_2").Frame("subContent").WebEdit("WebEdit").Set DataTable("dpart", dtGlobalSheet)
Browser("Heimdall DLP数据泄漏防护系统 V2.2").Page("Heimdall DLP数据泄漏防护系统 V2.2_2").Frame("subContent").WebEdit("WebEdit_2").Drag 27,11
Browser("Heimdall DLP数据泄漏防护系统 V2.2").Page("Heimdall DLP数据泄漏防护系统 V2.2_2").Frame("subContent").WebEdit("WebEdit_2").Drop 27,11
Browser("Heimdall DLP数据泄漏防护系统 V2.2").Page("Heimdall DLP数据泄漏防护系统 V2.2_2").Frame("subContent").WebButton("保存").Click
Browser("Heimdall DLP数据泄漏防护系统 V2.2").Dialog("Windows Internet Explorer").WinButton("确定").Click
Next 楼主想实现什么功能? 报的啥子错? LZ指的错误是啥? 回复 1# liudong6664
猜想楼主的问题是用DataTable参数化迭代问题
还请楼主说明遇到问题,这样大伙才知道怎么样帮你解决问题 DataTable.GetSheet("你的Table名称").setCurrentRow(i) 这是什么东西
页:
[1]