风正一帆悬 发表于 2015-12-16 17:42:52

用QTP为文本框输入值之后，保存提示空值

本帖最后由 风正一帆悬 于 2015-12-16 17:53 编辑

求助大神，帮看看，我的QTP代码有什么问题吗？
WithBrowser("慧鼎人力资源管理系统").Page("慧鼎人力资源管理系统")
            .Frame("tb-page-frame").WebElement("新建").Click
   For i=0 To 5
            .Frame("tb-page-frame_2").Image("添加指标项").Click '添加5行
   Next
   .Frame("tb-page-frame_2").WebEdit("指标名称").Set "绩效指标指数"&xiao
   .Frame("tb-page-frame_2").WebEdit("指标描述").Set "少年中国强"&xiao
'取出WebTable中所有数据

tRow = otable.RowCount   '获取WebTable的行 数
print "tRow = " &tRow         '打印WebTable的行数
tColumn = otable.ColumnCount(1)'获取WebTable的列 数
print "tColumn = " &tColumn               '打印WebTable的列数

For i = 2 to tRow '依次输出每一行，每一列的元素
Dim Text

    For j = 1 to tColumn-2
      Set Text=otable.ChildItem(i,j,"WebEdit",0)
         
SelectCasej
Case 1
             Text.object.Value="指标评分标准准"&i
   'MsgBox Text.GetROProperty("value")
    wait 1
   Case 2
         Text.object.Value="100"
   wait 1
End Select
   Next
Next

.Frame("tb-page-frame_2").WebElement("保存").Click '保存以上信息
End With

填写时，一切正常，但是执行到保存后，页面就提示了输入不能为空了，请问这是为什么呢？

风正一帆悬 发表于 2015-12-17 10:03:01

跪求大神儿指点啊！:'(

lgh75560 发表于 2015-12-17 10:59:47

Text.object.Value="100"赋值后，这个控件添加个click属性看看
就是赋值后，点击一下这个控件，使控件获得焦点

我只是猜的，可以尝试一下、

风正一帆悬 发表于 2015-12-17 11:38:13

lgh75560 发表于 2015-12-17 10:59
Text.object.Value="100"赋值后，这个控件添加个click属性看看
就是赋值后，点击一下这个控件，使控件获 ...

试了一下，添加了Text.Click 之后，还是一样的提示。。。不过依然谢谢你的解答。:)

赵佳乐SMILE 发表于 2015-12-17 11:56:22

用Text.object.Value 去赋值，本身赋的就是假值，不那么可靠
换换innerText等其他属性
或者不用描述性编程 直接webeidt去set值
或者换个流程，先把值赋进去，在点击添加一行

jingzizx 发表于 2015-12-17 13:40:35

用webedit.set不行吗

风正一帆悬 发表于 2015-12-17 13:43:36

jingzizx 发表于 2015-12-17 13:40
用webedit.set不行吗

之前用的就是Set，同样的不好用，真是好诡异。。。难道是因为每一行文本框都是动态添加的缘故？因为那个For循环，就是点击了5次那个添加行列的绿色加号图标。

风正一帆悬 发表于 2015-12-18 09:24:13

赵佳乐SMILE 发表于 2015-12-17 11:56
用Text.object.Value 去赋值，本身赋的就是假值，不那么可靠
换换innerText等其他属性
或者不用描述 ...

放弃描述WebTable了，改用描述WebEdit就好了。:)
页: [1]
查看完整版本: 用QTP为文本框输入值之后，保存提示空值