当前位置:编程学习 > VB >>

QTP弹出对话框勾选结点,回放脚本,父对象不存在(已更新附上脚本).

各位大侠~请看到帮忙解决下,查找资料半天未找到结果!
   问题请参见附件;
   原代码如下:
Browser("*有限公司").Page("*有限公司").WebEdit("UserName").Set "abc"
Browser("*有限公司").Page("*有限公司").Image("Submit").Click 61,15
Browser("*有限公司").Page("*有限公司").Frame("ifrIndexTop").WebElement("公文").Click
Browser("*有限公司").Page("*有限公司_2").Frame("leftMenu").WebElement("培训通知").Click
Browser("*有限公司").Page("*有限公司_2").Frame("frameContent").WebButton("起草培训通知").Click
Browser("工作流服务平台").Page("工作流服务平台").Sync
Browser("*有限公司").Page("*有限公司").Sync
Dialog("Internet Explorer").WinButton("是(Y)").Click
Browser("工作流服务平台").Page("工作流服务平台").Frame("bottomFrame_2").WebEdit("FileTitle").Set "ddd"
Browser("工作流服务平台").Page("工作流服务平台").Frame("bottomFrame_2").WebEdit("KeyWord").Set "dddd"
Browser("工作流服务平台").Page("工作流服务平台").Frame("bottomFrame_2").WebElement("*主       送").Click

Browser("工作流服务平台").Window("部门选择 -- 网页对话框").Page("部门选择").Frame("ifrmAdTree").WebCheckBox("WebCheckBox").Set "ON"

Browser("工作流服务平台").Window("部门选择 -- 网页对话框").Page("部门选择").Frame("ifrmAdTree").WebCheckBox("WebCheckBox_2").Set "ON"
Browser("工作流服务平台").Window("部门选择 -- 网页对话框").Page("部门选择").WebButton(">>>").Click
Browser("工作流服务平台").Window("部门选择 -- 网页对话框").Page("部门选择").WebButton("确定").Click

说明: 1.主要操作:点击"主送"按钮,弹出"部门选择 -- 网页对话框",勾选部门结点.提交
         2.回放脚本时,绿色部分脚本已执行通过,红色部分抛出异常,提示WebCheckBox的父对象Page("部门选择")找不到.
         异常请参考附件
         3.对象库中,父对象Page("部门选择"),属性均为空,未写入值
  
请问如何解决????
--------------------编程问答-------------------- [img=桌面][/img]
补充:VB ,  控件
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,