上传视频，选择视频路径，出现错误

rivermen

上传视频，选择视频路径，出现错误：


代码：

'点击ActiveX控件 open
Browser("Browser").Page("都视网 www.dusee.cn 上传视频_2").WinObject("MacromediaFlashPlayerActiveX").Click 353,46
wait 1


Browser("Browser").Dialog("选择要上载的挡案自 vcupload.dusee.cn").WinComboBox("查找范围(I):").Select "本地磁盘 (E:)"
wait 1

itemRange=Browser("Browser").Dialog("选择要上载的挡案自 vcupload.dusee.cn").WinComboBox("查找范围(I):").GetROProperty("text")
'Browser("Browser").Dialog("选择要上载的挡案自 vcupload.dusee.cn").Activate


reporter.ReportEvent 2,"报告选中条目",itemRange


Browser("Browser").Dialog("选择要上载的挡案自 vcupload.dusee.cn").WinListView("查找范围(I):").Activate "视频"


参照图片：
在
Browser("Browser").Dialog("选择要上载的挡案自 vcupload.dusee.cn").WinComboBox("查找范围(I):").Select "本地磁盘 (D:)"

出错，找到的是“我的电脑”，而不是 "本地磁盘 (D:)"

如果我把代码中"本地磁盘 (D:)"，改成"桌面"，"我的文档"，"我的电脑"，都是正常的。

是因为回放的时候太快了，来不及检索？还是因为其他别的什么原因？

rivermen

我采取的解决方案：

Dim itemRange,c
c=0
Do while itemRange<>"本地磁盘 (D:)"
        c=c+1
        Browser("Browser").Dialog("选择要上载的挡案自 vcupload.dusee.cn").WinComboBox("查找范围(I):").Select "本地磁盘 (D:)"
        itemRange=Browser("Browser").Dialog("选择要上载的挡案自 vcupload.dusee.cn").WinComboBox("查找范围(I):").GetROProperty("text")
Loop

wait 1


'Browser("Browser").Dialog("选择要上载的挡案自 vcupload.dusee.cn").Activate
reporter.ReportEvent 2,"报告选中条目",itemRange & "："& c



从报告上看，的确做了两次选择的动作
不知道什么原因，还有没有更好的解决方案？

rivermen

自己顶~~~~~~