51Testing软件测试论坛

标题: 不会的问题 [打印本页]

作者: xp20683    时间: 2007-3-8 10:31
标题: 不会的问题
我现在有个问题,我要删除界面上所有的用户和用户,但是每个用户是属于不同的组,如果将组内所有的用户删除,该组自动删除 ,但是删除用户95的代码(RD为组名):
            Dialog("VCM").WinTreeView("SysTreeView32").Select "RD;95", micRightBtn
           Dialog("VCM").WinTreeView("SysTreeView32").WinMenu("ContextMenu").Select "<Item 7>"
           Dialog("VCM").Dialog("vcm_exe").WinButton("是(Y)").Click
"RD;95"不是"95",但是组名又是不确定的
i=0
Do  while i<r
   a=Dialog("VCM").WinTreeView("SysTreeView32").GetItem(i)
   Dialog("VCM").WinTreeView("SysTreeView32").Select a, micRightBtn
     If not(Dialog("VCM").WinTreeView("SysTreeView32").WinMenu("ContextMenu").Exist(1))Then
                   group=a
  else
           Dialog("VCM").WinTreeView("SysTreeView32").Select group+";"+a, micRightBtn
           Dialog("VCM").WinTreeView("SysTreeView32").WinMenu("ContextMenu").Select "<Item 7>"
           Dialog("VCM").Dialog("vcm_exe").WinButton("是(Y)").Click
   end  if               
i=i+1
loop
可是不行,图字附件中,有什么方法可以解决这个问题
注意:又键组名没有对话框
作者: Mario    时间: 2007-3-8 11:15
我是帮不上什么忙了,不过我建议你应该把标题改一下,比方说这是在什么语言下,什么环境下,问题的具体描述等




欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/) Powered by Discuz! X3.2