急于一个问题？

wiwimeier

用QTP循环来取此表中的数值放入记事本中，我现在只录制一次复制的过程，来进行循环，但是现在我的脚本运行复制出来的数据全是一样的，我如何能通过循环得到每一个数据呢？   
这是我的脚本
Dim Cont
Cont = 0
While Cont<5
Window("图片取文字").Activate
Window("图片取文字").Click 84,256
Window("图片取文字").Drag 117,490
Window("图片取文字").Drop 8,487
Window("图片取文字").Type micCtrlDwn + "c" + micCtrlUp
Window("图片取文字").Activate
Window("记事本").WinEditor("Edit").Type micCtrlDwn + "v" + micCtrlUp
Window("记事本").WinEditor("Edit").Type  micReturn
Window("图片取文字").Click 72,272
Window("图片取文字").Activate
Cont = Cont+1
Wend

milo.jiang

你可以考虑一下每行单元格区别在于纵坐标不一样，横坐标一致，而且每个单元格之间的纵坐标间隔是一样的，可以将纵坐标写成【初始坐标+纵坐标间隔*n】，n为循环的次数

wiwimeier

我现在把脚本改成这样的，但是运行还是出错
Dim rowCount
Dim outValue
set rowCount=JavaWindow("图片取文字").JavaInternalFrame("CheckRetBillCustomeImage[数据中心]").JavaTable("运单总数：3条")
Set ro=rowCount.GetTOProperties
JavaWindow("图片取文字").JavaInternalFrame("CheckRetBillCustomeImage[数据中心]").JavaTable("运单总数：3条").SelectRow "#0"
For i=0 to ro.Count+1
JavaWindow("图片取文字").JavaInternalFrame("CheckRetBillCustomeImage[数据中心]").JavaTable("运单总数：3条").SelectRow "#" & i
JavaWindow("图片取文字").JavaInternalFrame("CheckRetBillCustomeImage[数据中心]").JavaEdit("未审核").PressKey "C",micCtrl
set outValue=JavaWindow("图片取文字").JavaInternalFrame("CheckRetBillCustomeImage[数据中心]").JavaEdit("未审核").GetROProperty
msgbox outValue("Value")
Window("记事本").Activate
Window("记事本").WinEditor("Edit").Type micCtrlDwn + "v" + micCtrlUp
Window("记事本").WinEditor("Edit").Type  micReturn
Next

报错时提示：set outValue=JavaWindow("图片取文字").JavaInternalFrame("CheckRetBillCustomeImage[数据中心]").JavaEdit("未审核").GetROProperty  中总是说GetROProoerty为错误。不知道这个应该改成什么呀？

wiwimeier

呵呵，现在已经搞定~