判断一个节点被删除后还是否存在，如何处理呢？

zhengpeipei 发表于 2009-10-30 18:14:08

Window("XXX").WinTreeView("SysTreeView32").Select DataTable("节点名称", dtGlobalSheet)
Window("XXX").WinToolbar("ToolbarWindow32_3").ShowDropdown 1
Window("XXX").WinMenu("ContextMenu").Select "删除"
Dialog("确定").WinButton("是(Y)").Click
接下来怎样判断这个被删除的节点是否存在呢？请各位高手指点一下，最好能给出脚本，谢谢啦！

zhengpeipei 发表于 2009-10-30 18:42:26

:funk: :funk: :funk:

hsjzfling 发表于 2009-10-30 18:53:47

删除后遍历Window("XXX").WinTreeView("SysTreeView32")中的所有元素，看看还有那个删掉的节点名称

zhengpeipei 发表于 2009-10-30 18:59:25

回复楼上的帖子

能否将脚本写出来呢，谢谢了。

zhengpeipei 发表于 2009-10-31 10:38:36

Dim j,node3,k
node3=datatable.Value("节点名称","Global")
For j=0 to Window("XXX").WinTreeView("SysTreeView32").GetItemsCount -1
If Window("XXX").WinTreeView("SysTreeView32").GetItem(j)=node3 Then
k=1
Reporter.ReportEvent micPass,"删除节点失败","删除节点失败！"
DataTable.GetSheet("Global").SetNextRow
else
k=0
End If
Next
If k=0 Then
Reporter.ReportEvent micPass,"删除节点成功","删除节点成功！"
End If

我使用上面的代码来实现的，但是感觉不是很简练，是否有其它更好的方法呢？

zero0223 发表于 2009-10-31 11:01:00

Dim j,node3,k
node3=datatable.Value("节点名称","Global")
For j=0 to Window("XXX").WinTreeView("SysTreeView32").GetItemsCount -1
   If Window("XXX").WinTreeView("SysTreeView32").GetItem(j)=node3 Then

            Reporter.ReportEvent micPass,"删除节点失败","删除节点失败！"
            DataTable.GetSheet("Global").SetNextRow
   else

            Reporter.ReportEvent micPass,"删除节点成功","删除节点成功！"
End If
Next
这样不行，为什么要另外加个判断？

[ 本帖最后由 zero0223 于 2009-10-31 11:02 编辑 ]

zhengpeipei 发表于 2009-11-2 11:12:25

回复zero0223的帖子

若在加上else
Reporter.ReportEvent micPass,"删除节点成功","删除节点成功！"
那不是每次循环都会有这个信息导出吗。

zhengpeipei 发表于 2009-11-2 18:43:34

zhengpeipei 发表于 2009-11-3 10:59:21

自己顶一下:P

zhengpeipei 发表于 2009-11-4 09:59:54

:funk:

页: [1]

51Testing软件测试论坛 's Archiver