获取页面的tree节点，并点击

 

1. use Win32::GuiTest qw(:ALL); 
2.  
3.    use Win32::IEAutomation; 
4.  
5.    use Win32::IEAutomation::WinClicker; 
6.  
7.    use Win32::IEAutomation::Element; 
8.  
9.    my $ie = Win32::IEAutomation->new(visible =>1); 
10.  
11.    $ie -> gotoURL('http://192.168.183.13:8080/smp/'); 
12.  
13.    $ie -> WaitforDone(); 
14.  
15.    $ie -> getTextBox("name:","managerId") -> SetValue("admin"); 
16.  
17.    $ie -> getTextBox("name:","password")  -> SetValue("111111111"); 
18.  
19.    $ie -> getImage("id:","Image1") -> Click(); 
20.  
21.    #获取tree中的节点 
22.  
23.    $ie -> getFrame("name:","menu") -> getLink("linktext:","用户组") -> Click(); 
24.  
25. #  $ie -> getFrame("name:","smp_content") -> 
26.  
27.   
28.  

29.  

     

     

    

30.  
31.   

 

转载于:https://blog.51cto.com/624569/433343