watir学习系列--对话框处理(转)

最新推荐文章于 2024-07-11 15:38:03 发布
最新推荐文章于 2024-07-11 15:38:03 发布
阅读量114 收藏
点赞数
文章标签： 测试 javascript ViewUI
原文链接：http://www.cnblogs.com/liuyang92/p/5887191.html
版权

1.下面是网上编写的类库，保存为libAutoit.rb

#LibAutoit主要处理windows弹出的对话框，调用autoit类进行处理
#函数如下：
#- ChooseFileDialog函数：处理选择文件对话框窗口
#- clearSecurityAlert函数：处理安全警告对话框
#- ControlSetText函数：给对话框中的某个控件设置值
#- ControlClick函数：向指定控件发送鼠标点击命令
#- ControlGetText函数：获取指定控件值
#- ControlGetHandle函数：获取指定控件值的句柄
#- ControlFocus函数：设置输入焦点到指定窗口的某个控件上
#- DealDownloadDialog函数：处理文件下载对话框
#- DealPathDialog函数：设置下载文件路径及操作下载，如果文件已存在则覆盖处理
#- DealAlterDialog函数：处理Alter对话框
#- DealConfirmDialog函数：处理Confirm对话框
#- DealPromptDialog函数：处理Prompt对话框
#- DealSecurity函数：点击页面链接，使弹出安全警告对话框
#- GetDialogTitle函数：根据类型获取弹出的窗口标题
#- SendKey函数：模拟键盘输入字符
#- WinExists函数：判断窗口是否存在

module LibAutoit
  class AutoItApi
    def initialize
      require 'win32ole'
      require 'watir/windowhelper'
      WindowHelper.check_autoit_installed      
      @autoit = WIN32OLE.new("AutoItX3.Control")  
      
      @DealDownloadDialogTimeOut  = 40
      @DealPathDialogTimeOut        = 40
      @ChooseFileDialogTimeOut      = 40
      @DealAlterDialogTimeOut        = 40
      @DealConfirmDialogTimeOut    = 40
      @DealPromptDialogTimeOut     = 40
      @DealSecurityTimeOut           = 40
      @clearSecurityAlertTimeOut    = 40
      
    end #def initialize end
    
    #功能说明：根据类型获取弹出的窗口标题，因为IE各版本弹出的对话框标题有差异，需要进行特殊处理
    #
    #参数说明：
    #type：窗口类型，具体值如下：
    #- type=1：选择文件窗口标题
    #- type=2：Alter窗口标题
    #- type=3：Prompt窗口标题
    #- type=4：安全警告窗口标题
    #- type=5：文件下载窗口标题
    #- type=6：文件另存为窗口标题
    #
    #调用示例： GetDialogTitle(2)
    #
    #返回值说明：
    #- 成功：返回获取的标题
    #- 失败：返回false
    def GetDialogTitle(type = 2)
      #$logger.log("调用函数：LibAutoit.rb文件中的GetDialogTitle(#{type})" )
      
      case type
        when 1 #选择文件窗口标题
          dialog_title = ['选择文件','Choose file']
        when 2 #Alter窗口标题
          dialog_title = ['Microsoft Internet Explorer','Windows Internet Explorer']
        when 3 #Prompt窗口标题
          dialog_title = ['Explorer 用户提示','Explorer User Prompt']
        when 4 #安全警告窗口标题
          dialog_title = ['安全警告','Security Alert']
        when 5 #文件下载窗口标题
          dialog_title = ['文件下载 - 安全警告','文件下载','File Download']
        when 6  #文件另存为窗口标题
          dialog_title = ['另存为']
      end
        
      dialog_title.each do |title|
        if (WinExists(title,'') == 1) 
          $logger.log("获取的窗口：#{title}",'N')
          $logger.log("调用函数结束：LibAutoit.rb文件中的GetDialogTitle(#{type})" ,'N')
          
          return  title
        end
      end
        return false
        #$logger.log("调用函数结束：LibAutoit.rb文件中的GetDialogTitle(#{type})" )
    end
    
    #功能说明：处理文件下载对话框，调用DealPathDialog函数设置路径及下载文件
    #
    #参数说明：
    #- file_path：文件下载后存放的路径，格式如：c:\\test
    #- file_name：文件名，如：test.txt
    #- timeout：对话框处理的超时时间，默认为20秒
    #
    #调用示例： DealDownloadDialog(“c:\\test\test.txt”,15)
    #
    #返回值说明：
    #-  成功：返回ture
    #- 失败：返回false
    def DealDownloadDialog(file_path,file_name,timeout = @DealDownloadDialogTimeOut )
      $logger.log("调用函数：LibAutoit.rb文件中的DealDownloadDialog(#{file_path},#{file_name},#{timeout})",'N' )
      $logger.log('----------deal with download File dialog begin----------')
      start_time = Time.now.to_i
      
      while 1
        if (Time.now.to_i-start_time < timeout)   #判断处理时间是否超时
          
          win_title = GetDialogTitle(5) #获取窗口标题

          if (win_title)
            @autoit.WinActivate(win_title,'')
            sleep(1)
            ControlClick(win_title,'','Button2')
            
            DealPathDialog(file_path,file_name)
            
            $logger.log('----------deal with download File dialog end----------')
            $logger.log("调用函数结束：LibAutoit.rb文件中的DealDownloadDialog()，返回结果：true",'N' )
            return true
          end
        else
          $logger.log("Deal Download File Dialog Fail!")
          $logger.log('----------deal with download File dialog end----------')
          $logger.log("调用函数结束：LibAutoit.rb文件中的DealDownloadDialog()，返回结果：false",'N' )
          return false
        end
      end
    end
    
    
    #功能说明：设置下载文件路径及操作下载，如果文件已存在则覆盖处理
    #
    #参数说明：
    #- file_path：文件下载后存放的路径，格式如：c:\\test
    #- file_name：文件名，如：test.txt
    #- timeout：对话框处理的超时时间，默认为20秒
    #
    #调用示例： 
    #- DealPathDialog(“c:\\test”,"test.txt")
    #
    #返回值说明：
    #-  成功：返回true
    #- 失败：返回false
    def DealPathDialog(file_path,file_name = '',timeout = @DealPathDialogTimeOut )
      $logger.log("调用函数：LibAutoit.rb文件中的DealPathDialog(#{file_path},#{file_name},#{timeout})",'N' )
      
      start_time = Time.now.to_i
      
      while 1
        if (Time.now.to_i-start_time < timeout)   #判断处理时间是否超时
          win_title = GetDialogTitle(6) #获取窗口标题
          
          if (win_title)
            @autoit.WinActivate(win_title,'')
            
            #if (file_name == '')
              #file_name =  ControlGetText(win_title,'','Edit1')
            #end
            
            if (!FileTest::exist?(file_path))
              FileUtils.makedirs(file_path)
            end
            
            file_full_path = "#{file_path}\\#{file_name}"
            
            real_file_path = $TxtClass.GetRealPath(file_full_path,'N')
            real_full_path = "#{real_file_path}\\#{file_name}"
            
            ControlSetText(win_title,'','Edit1',real_full_path)
            SendKey("!S")
            #ControlClick(win_title,'','Button2')
            
            if (WinExists(win_title,'替换') == 1) 
              @autoit.WinActivate(win_title,'替换')
              ControlClick(win_title,'替换','Button1')
            end
            
            $logger.log("调用函数结束：LibAutoit.rb文件中的DealPathDialog()" ,'N')
            return true
          end
        else
          $logger.log("Deal File Path Dialog Fail!")
          $logger.log("调用函数结束：LibAutoit.rb文件中的DealPathDialog()" ,'N')
          return false
        end
      end
    end
    
    #功能说明：处理选择文件对话框窗口
    #
    #参数说明：无
    #- file_path：文件下载后存放的路径，格式：目录+文件名，如：c:\\test\\test.txt
    #- timeout：对话框处理的超时时间，默认为20秒
    #
    #调用示例： ChooseFileDialog(“c:\\test\\test.txt”,15)
    #
    #返回值说明：
    #-  成功：返回true
    #- 失败：返回false
    def ChooseFileDialog(file_path,timeout = @ChooseFileDialogTimeOut)
      $logger.log("调用函数：LibAutoit.rb文件中的ChooseFileDialog(#{file_path},#{timeout})" ,'N')
      
      $logger.log('----------deal with Choose File dialog begin----------')
      start_time = Time.now.to_i
      
      while 1
        if (Time.now.to_i-start_time < timeout)   #判断处理时间是否超时
          win_title = GetDialogTitle(1) #获取窗口标题

          if (win_title)
            @autoit.WinActivate(win_title,'')
            
            if (FileTest::exist?(file_path))
              real_file_path = $TxtClass.GetRealPath(file_path)  #获取真实路径
              
              ControlSetText(win_title,'','Edit1',real_file_path)
              ControlClick(win_title,'','Button2')
              
              $logger.log('----------deal with Choose File dialog end----------')
              $logger.log("调用函数结束：LibAutoit.rb文件中的ChooseFileDialog(#{file_path},#{timeout})",'N' )
              
              return true
            else
              $logger.log('----------deal with Choose File dialog end----------')
              $logger.log("调用函数结束：LibAutoit.rb文件中的ChooseFileDialog(#{file_path},#{timeout})",'N' )
              return false
            end
          end
        else
          $logger.log("Deal Choose File Dialog Fail!")
          $logger.log('----------deal with Choose File dialog end----------')
          $logger.log("调用函数结束：LibAutoit.rb文件中的ChooseFileDialog(#{file_path},#{timeout})" ,'N')
          return false
        end
      end
    end
    
    #功能说明：处理Alter对话框
    #
    #参数说明：
    #- timeout：对话框处理的超时时间，默认为20秒
    #
    #调用示例： DealAlterDialog(15)
    #
    #返回值说明：
    #-  成功：返回对话框中的文本提示内容
    #- 失败：返回false
    def DealAlterDialog(timeout = @DealAlterDialogTimeOut )
      $logger.log("调用函数：LibAutoit.rb文件中的DealAlterDialog(#{timeout})" ,'N')
      $logger.log('----------deal with alter dialog begin----------')
      
      start_time = Time.now.to_i
      
      while 1
        if (Time.now.to_i-start_time < timeout)   #判断处理时间是否超时
          win_title = GetDialogTitle(2) #获取窗口标题
          if (win_title) 
            @autoit.WinActivate(win_title,'')
              
            alter_content =  ControlGetText(win_title,'','Static2')
            SendKey('{ENTER}')
            #ControlClick('Windows Internet Explorer','','Button1')
            #puts "alter message:\n #{alter_content}"
              
            $logger.log("the content of alter dialog： #{alter_content} ",'N')
            $logger.log('-----------deal with alter dialog end-----------')
            $logger.log("调用函数结束：LibAutoit.rb文件中的DealAlterDialog(#{timeout})" ,'N')
            return alter_content
          end
        else
          $logger.log("deal with alter dialog fail!")
          $logger.log('-----------deal with alter dialog end-----------')
          $logger.log("调用函数结束：LibAutoit.rb文件中的DealAlterDialog(#{timeout})" ,'N')
          return false
        end
      end
    end
    
    #功能说明：处理Confirm对话框
    #
    #参数说明：
    #- type：点击确定或取消按钮，Y：确定  N：取消
    #- timeout：对话框处理的超时时间，默认为20秒
    #
    #调用示例： DealConfirmDialog()
    #
    #返回值说明：
    #-  成功：返回对话框中的文本提示内容
    #- 失败：返回false
    def DealConfirmDialog(type = 'Y',timeout = @DealConfirmDialogTimeOut)
      $logger.log("调用函数：LibAutoit.rb文件中的DealConfirmDialog()" ,'N')
      $logger.log('----------deal with confirm dialog begin----------')
      start_time = Time.now.to_i
      
      while 1
        if (Time.now.to_i-start_time < timeout)   #判断处理时间是否超时
          win_title = GetDialogTitle(2) #获取窗口标题'
          
          if (win_title)
            @autoit.WinActivate(win_title,'')
            
            confirm_content =  ControlGetText(win_title,'','Static2')
            
            case type 
              when 'Y'
                ControlClick(win_title,'','Button1')
              when 'N'
                ControlClick(win_title,'','Button2')
            end
            $logger.log("the content of confirm dialog： #{confirm_content} ",'N')
            $logger.log('-----------deal with confirm dialog end-----------')
            $logger.log("调用函数结束：LibAutoit.rb文件中的DealConfirmDialog()" ,'N')
            
            return confirm_content
            #puts "窗口提示信息：#{confirm_content}"
          end
        else
          $logger.log("deal with confirm dialog fail!")
          $logger.log('-----------deal with confirm dialog end-----------')
          $logger.log("调用函数结束：LibAutoit.rb文件中的DealConfirmDialog()" ,'N')
          
          return false
        end
      end
    end
    
    #功能说明：处理Prompt对话框
    #
    #参数说明：
    #- string：输入的文本内容
    #- type：点击确定或取消按钮，Y：确定  N：取消
    #- timeout：对话框处理的超时时间，默认为20秒
    #
    #调用示例： DealPromptDialog('test','Y',15)
    #
    #返回值说明：
    #-  成功：返回true
    #- 失败：返回false
    def DealPromptDialog(string = '',type = 'Y',timeout = @DealPromptDialogTimeOut )
      $logger.log("调用函数：LibAutoit.rb文件中的DealPromptDialog(#{string},#{type},#{timeout})" ,'N')
      
      puts '----------deal with prompt dialog begin----------'
      start_time = Time.now.to_i
      
      while 1
        if (Time.now.to_i-start_time < timeout)   #判断处理时间是否超时
          win_title = GetDialogTitle(3) #获取窗口标题
          if (win_title)
            @autoit.WinActivate(win_title,'')
              
            ControlSetText(win_title,'','Edit1',string)
            case type 
              when 'Y'
                ControlClick(win_title,'','Button1')
              when 'N'
                ControlClick(win_title,'','Button2')
            end
              $logger.log('-----------deal with prompt dialog end-----------')
              $logger.log("调用函数结束：LibAutoit.rb文件中的DealPromptDialog(#{string},#{type},#{timeout})" ,'N')
              
            return true
          end 
        else
          $logger.log("deal with prompt dialog fail!")
          $logger.log('-----------deal with prompt dialog end-----------')
          $logger.log("调用函数结束：LibAutoit.rb文件中的DealPromptDialog(#{string},#{type},#{timeout})" ,'N')
          
          return false
        end
      end
    end

    #功能说明：点击页面链接，使弹出安全警告对话框
    #
    #参数说明：
    #- win_title：IE页面的标题
    #- timeout：对话框处理的超时时间
    #
    #调用示例： DealSecurity("ie标题",15)
    #
    #返回值说明：
    #-  成功：返回true
    #- 失败：返回false
    def DealSecurity(win_title,timeout = @DealSecurityTimeOut)
      $logger.log("调用函数：LibAutoit.rb文件中的DealSecurity(#{win_title},#{timeout})" ,'N')
      
      start_time = Time.now.to_i
      
      if (Time.now.to_i-start_time < timeout)   #判断处理时间是否超时
        while 1
          @autoit.ControlClick(win_title,'','Button1')
          sleep(1)
          SendKey('{DOWN}')
          SendKey('{ENTER}')
          sleep(1)
            
          clearSecurityAlert('Y')  #清除安全框窗口
          return true
        end
      else
        $logger.log('Deal Security Fail!')
        $logger.log("调用函数结束：LibAutoit.rb文件中的DealSecurity(#{win_title},#{timeout})" ,'N')
        
        return false
      end
    end
    
    #功能说明：处理安全警告对话框
    #
    #参数说明：
    #- type：选择点击哪个按钮，Y：确定  N：取消
    #- timeout：对话框处理的超时时间
    #
    #调用示例： DealSecurity("ie标题",15)
    #
    #返回值说明：
    #-  成功：返回安全警告窗口中的提示信息
    #- 失败：返回false
    def clearSecurityAlert(type = 'Y',timeout = @clearSecurityAlertTimeOut)
      $logger.log("调用函数：LibAutoit.rb文件中的clearSecurityAlert(#{type},#{timeout})" ,'N')
      $logger.log('----------deal with Security dialog begin----------')
      #处理安全对话框
      start_time = Time.now.to_i
      
      while 1
        if (Time.now.to_i-start_time < timeout)   #判断处理时间是否超时
          win_title = GetDialogTitle(4) #获取窗口标题
          
          if (win_title)
            alter_content =  ControlGetText(win_title,'','Static2')
              
            case type
              when 'Y'
                ControlClick(win_title,'','Button1')
              when 'N'
                ControlClick(win_title,'','Button2')
            end
            #puts "安全警告信息：\n#{alter_content}"
              
            $logger.log("the content of Security dialog： #{alter_content} ")
            $logger.log('-----------deal with Security dialog end-----------')
            $logger.log("调用函数结束：LibAutoit.rb文件中的clearSecurityAlert(#{type},#{timeout})" ,'N')
            return alter_content
          end 
        else
          $logger.log("The Security Alert Windows is not exist!")
          $logger.log('-----------deal with Security dialog end-----------')
          $logger.log("调用函数结束：LibAutoit.rb文件中的clearSecurityAlert(#{type},#{timeout})",'N' )
          
          return false
        end
      end
    end
    
    #功能说明：模拟键盘输入字符
    #
    #参数说明：
    #- string：输入的字符串信息，
    #- timeout：对话框处理的超时时间
    #
    #调用示例： 
    #- Send("#r")  将发送 Win+r,这将打开“运行”对话框.
    #- Send("^!a")   发送按键 "CTRL+ALT+a".
    #- Send(" !a")    按下"ALT+a".
    #
    #返回值说明：无
    def SendKey(string = '{ENTER}')
      @autoit.Send(string)
    end
    
    #功能说明：给对话框中的某个控件设置值
    #
    #参数说明：
    #- win_title：对话框窗口的标题
    #- win_text:对话框窗口中显示的文本
    #- id：对话框窗口中某个控件的ID
    #- string：控件设置的值
    #
    #调用示例： 无
    #
    #返回值说明：无
    def ControlSetText(win_title,win_text,id,string = '',flag = 1)
      #修改指定控件的文本
      @autoit.WinActivate(win_title,win_text)
        
      if (ControlFocus(win_title,win_text,id) == 1)
        @autoit.ControlSetText(win_title,win_text,id,string)
      end
    end
    
    #功能说明：向指定控件发送鼠标点击命令
    #
    #参数说明：
    #- win_title：目标窗口标题. 
    #- win_text：目标窗口文本. 
    #- id：目标控件ID
    #- button_type：按键 [可选参数] 要点击的按钮, 可以是"left", "right", "middle", "main", "menu", "primary", "secondary". 默认为left(左键). 
    #- click_time ：要点击鼠标按钮的次数. 默认值为 1.
    #
    #调用示例： 无
    #
    #返回值说明：无
    def ControlClick(win_title,win_text,id,button_type =1,click_time = 1)
      @autoit.AutoItSetOption("WinTitleMatchMode", 3)
      
      @autoit.WinActivate(win_title,win_text)
        
      case button_type 
        when 1 #点击鼠标左键
          button_type = 'left'
        when 2  #点击鼠标右键
          button_type = 'right'
        when 3 #点击鼠标中间键
          button_type = 'middle'
      end
        
      @autoit.ControlClick(win_title,win_text,id,button_type,click_time)
    end 
    
    #功能说明：获取指定控件值
    #
    #参数说明：
    #- win_title：目标窗口标题. 
    #- win_text：目标窗口文本. 
    #- id：目标控件ID
    #
    #调用示例： 无
    #
    #返回值说明：
    #- 返回获取的文本内容
    def ControlGetText(win_title,win_text,id)
      if (ControlGetHandle(win_title,win_text,id) != "")
        control_text =  @autoit.ControlGetText(win_title,win_text,id)
        
        return control_text
      end
    end
    
    #功能说明：获取指定控件值的句柄
    #
    #参数说明：
    #- win_title：目标窗口标题. 
    #- win_text：目标窗口文本. 
    #- id：目标控件ID
    #
    #调用示例： 无
    #
    #返回值说明：
    #- 返回获取的控件句柄
    def ControlGetHandle(win_title,win_text,id)
      ret = @autoit.ControlGetHandle(win_title,win_text,id)
      return ret
    end
    
    #功能说明：设置输入焦点到指定窗口的某个控件上
    #
    #参数说明：
    #- win_title：目标窗口标题. 
    #- win_text：目标窗口文本. 
    #- id：目标控件ID
    #
    #调用示例： 无
    #
    #返回值说明：无
    def ControlFocus(win_title,win_text,id)
      #设置输入焦点到指定窗口的某个控件上
      ret = @autoit.ControlFocus(win_title,win_text,id)
      return ret
    end 
    
    
    #功能说明：判断窗口是否存在
    #
    #参数说明：
    #- win_title：目标窗口标题. 
    #- win_text：目标窗口文本，默认为空
    #
    #调用示例： 无
    #
    #返回值说明：返回窗口对象
    def WinExists(win_title,win_text = '') 
      #检查指定的窗口是否存在
      ret = @autoit.WinExists(win_title,win_text = '') 
      return ret
    end 

  end
end
窗口处理类库libAutoit.rb

HTML示例，保存到d:\test.html

<html>
  <head>
    <title>watir处理对话框</title>
     <script language= "javascript" type="text/javascript">
            function clickbutton(flag)
            {
                if (flag == 1) alert("测试alter对话框");
                if (flag == 2) prompt("测试prompt对话框");
                if (flag == 3) confirm('测试confirm对话框', '测试confirm对话框?',"测试结果："); 
            }
        </script>
    </head>
    
    <body>
        <center>
        <H1>watir处理对话框<H1>
        <hr>
        
        <table border ="2">
            <tr>
                <th bgcolor = "#aaaaaa">测试内容</th>
                <th bgcolor = "#aaaaaa">操作</th>
            </tr>
        
            <tr>
                <td>文件上传</td>
                <td><input type="file" name="attach[]" /></td>
            </tr>
            
            <tr>
                <td>alter对话框</td>
                <td> 
                    <input type="button" name="alterbutton" value="测试alter对话框"  onclick = "clickbutton(1);" />
                </td>
            </tr>
            
            <tr>
                <td>prompt对话框</td>
                <td> 
                    <input type="button" name="promptbutton" value="测试prompt对话框"  onclick = "clickbutton(2);" />
                </td>
            </tr>
            
            <tr>
                <td>confirm对话框</td>
                <td> 
                    <input type="button" name="confirmbutton" value="测试confirm对话框"  onclick = "clickbutton(3);" />
                </td>
            </tr>
            
            </table>
        </center>
    </body>
</html>
html Code

处理对话框示例：

require 'watir'
require 'libAutoit'
require 'jcode'
$KCODE = 'e'

at = Autoit::AutoItApi.new
winClicker = WinClicker.new

url = "D:\\test.html"
ie =Watir::IE.new
ie.goto(url)
ie.maximize()

sleep(1)
at.DealSecurity("watir处理对话框 - Windows Internet Explorer")
puts "\n"

sleep(1)
#test alter dialog
ie.button(:name,"alterbutton").click_no_wait
sleep(10)
at.DealAlterDialog

puts "\n"

#test prompt dialog
ie.button(:name,"promptbutton").click_no_wait
sleep(10)
at.DealPromptDialog('test') 

puts "\n"

#test confirm dialog
ie.button(:name,"confirmbutton").click_no_wait
sleep(10)
at.DealConfirmDialog('Y')
testDialog.rb

 

2.

require 'watir\winClicker'
#require 'watir\contrib\enabled_popup'
ie = Watir::IE.new
ie.goto("http://mail.163.com/")
# 如果 IE 阻止了活动内容(JavaScript脚本)的运行，
# 需要利用这 5 秒时间手工点击IE信息栏，允许阻止的内容运行，
# 不然点击 Button 不会弹出窗口
sleep 5
ie.button(:id, 'loginBtn').click_no_wait
# 查找弹出窗口，设置查找超时时间为10秒
#如果窗口存在，则获取他的句柄，（10）指的是等待时间；
hwnd = ie.enabled_popup(10)
print hwnd
w = WinClicker.new
# 点击弹出窗口中的“确定”按钮
w.clickWindowsButton_hwnd(hwnd,"确定")
View Code

 

3.

require 'watir' 

#require 'win32ole'  # already included if you use 'require watir' 

# 

# Function to look for popups 

def check_for_popups 

    autoit = WIN32OLE.new('AutoItX3.Control') 

    # 

    # Do forever - assumes popups could occur anywhere/anytime in your application. 

    loop do 

        # Look for window with given title. Give up after 1 second. 

        ret = autoit.WinWait('Microsoft Internet Explorer', '', 1) 

        # 

        # If window found, send appropriate keystroke (e.g. {enter}, {Y}, {N}). 

        if (ret==1) then autoit.Send('{enter}') end 

        # 

        # Take a rest to avoid chewing up cycles and give another thread a go. 

        # Then resume the loop. 

        sleep(3) 

    end 

end 

# 

# MAIN APPLICATION CODE 

# Setup popup handler 

$popup = Thread.new { check_for_popups }  # start popup handler 

at_exit { Thread.kill($popup) }           # kill thread on exit of main application 

# 

# Main application code follows 

ie = Watir::IE.new 

ie.goto("http://localhost:88/Test3.html") 

ie.link(:text,"Click Here").click
检测弹出框是否存在，并消除

4.

autoit = WIN32OLE.new('AutoItX3.Control')
autoit.Send('{enter}')

 5.在Watir中整合AutoIt处理JavaScript弹出窗口的方法
[摘要：以下例子整开了 AutoIt ，正在独自的线程中监控战处置惩罚 JavaScript 弹出窗心： require 'watir' #require 'win32ole' # already included if you use 'require watir' # # Function to look for popups def check_for_popups autoit =]

以下例子整合了AutoIt，在单独的线程中监控和处理JavaScript弹出窗口：

require 'watir'

#require 'win32ole'  # already included if you use 'require watir'

#

# Function to look for popups

def check_for_popups

    autoit = WIN32OLE.new('AutoItX3.Control')

    #

    # Do forever - assumes popups could occur anywhere/anytime in your application.

    loop do

        # Look for window with given title. Give up after 1 second.

        ret = autoit.WinWait('Microsoft Internet Explorer', '', 1)

        #

        # If window found, send appropriate keystroke (e.g. {enter}, {Y}, {N}).

        if (ret==1) then autoit.Send('{enter}') end

        #

        # Take a rest to avoid chewing up cycles and give another thread a go.

        # Then resume the loop.

        sleep(3)

    end

end

#

# MAIN APPLICATION CODE

# Setup popup handler

$popup = Thread.new { check_for_popups }  # start popup handler

at_exit { Thread.kill($popup) }           # kill thread on exit of main application

#

# Main application code follows

ie = Watir::IE.new

ie.goto("http://localhost:88/Test3.html")

ie.link(:text,"Click Here").click
View Code

 

 6.Alert标题：

在火狐上 用 alert("你好");
弹出框的标题栏文字是(即时弹出框的上方)  “来自xxx的页面说：”  这个可以更改吗？
ie下是 Microsoft Internet Explorer

转载于:https://www.cnblogs.com/liuyang92/p/5887191.html

weixin_30480651
关注
  • 0
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
watir学习系列--对话框处理
aiwenhe2536的博客
04-27 134
一直有朋友问如何使用watir处理对话框的问题在网上搜了下相关的帖子，讲的都不是很详细，最近抽时间研究了下watir是调用autoit处理对话框的 下面是个人编写的类库，保存为libAutoit.rb 窗口处理类库libAutoit.rb#LibAutoit主要处理windows弹出的对话框，调用autoit类进行处理#函数如下：#-ChooseFileDialog函数...
watir_使用Watir单击JavaScript对话框
09-28 113
watirThere will soon be an easy way to click and generally deal with JavaScript Dialogs with Watir (Web Application Testing in Ruby, pronounced "WATER"). It's always been possible, but the team is wor...
针对popups类对话框的watir处理方法之一
Ricky的专栏
04-29 1020
<br /><br /> 针对该类对话框的watir处理方法：<br />require 'watir'<br />require 'win32ole'<br />require 'watir/WindowHelper' <br /># 登陆<br />$ie_site ='http://members.shaw.ca/paul_rogers/watir_tests/popups1.html'<br />$ie = Watir::IE.new<br />$ie.goto $ie_site<br />$ie.
Watir Ruby 对弹出框进行处理的方法总结
墨墨的江湖
07-08 304
最近想用Watir+Ruby写几个简单的脚本来提高工作效率，功能很简单，但是因为页面有多个security popup和弹出子窗口，还是头疼了几天，网上查了很多解决方法，综合总结如下： 1. AutoItX: require 'watir' #require 'win32ole' # already included if you use 'require watir' # ...
watir学习系列--调用AutoItX操作windows窗口
aiwenhe2536的博客
03-18 235
1、安装autoit3： 默认安装就可以了， 英文版：http://www.autoitscript.com/autoit3/downloads.shtml 汉化版：http://www.autoit.net.cn/viewthread.php?tid=6&extra=page%3D1 2、autoit3介绍： AutoIt3.exe...
selenium学习系列--windows窗口处理扩展
aiwenhe2536的博客
07-22 207
selenium对windows的扩展处理不好，需要通过外部工具进行扩展 下面是通过使用autoit3编写的一个处理外部处理成功，实现如下： 1、先建一个dialog.ini文件，配置信息保存在该ini文件中，如下： dialog.ini [Choosefile]title=选择文件|Choosefile[Alter]title=MicrosoftInternet...
学习编写自动化测试脚本——用脚本取代键盘鼠标操作浏览器
qq_44847147的博客
08-24 972
首先先了解一个简单脚本的基础构成： # coding = utf-8 # 可加可不加，防止乱码 from selenium import webdriver # 要想使用selenium里的webdriver里的函数，首先得把包导进去 import time # 导入时间模块 browser = webdriver.Firefox() # 获得浏览器驱动 time.sleep(3) # 在当前页面停止3秒钟 browser.get("http://www.baidu.com") # 用浏览器的驱动打开该.
WebDriver·TestNg学习日志(Java/Ruby/.Net版)
羊
12-19 1609
目录 WebDriver(JAVA)拾级而上 WebDriver拾级而上·之零 WebDriver理论 WebDriver拾级而上·之一 环境部署 WebDriver拾级而上·之二 浏览器操作 WebDriver拾级而上·之三 定位页面元素 WebDriver拾级而上·之四 操作页面元素 WebDriver拾级而上·之五 iframe的处理 WebDriver拾级而上·之六 获得弹...
watir-ruby-cucumber
03-06
瓦蒂尔CucumberRuby入门 1. Ensure you have the chrome browser installed 3. Ensure you have ruby + devkit installed. File in ... Run s.bat回馈我很乐意收到反馈，请给我发电子邮件： 。
test_logger1.rar_Logger wat_ruby _watir_watir ruby_watir-webdriv
09-22
总的来说，这个资源包提供了学习和实践Ruby自动化测试的一个实例，包括如何使用Logger模块进行日志记录以及如何利用Watir或Watir-Webdriver进行浏览器自动化测试。通过研究这个脚本，你可以深入理解Ruby在自动化测试...
watir-bonus-1.5.2
07-03
"Watir-Bonus-1.5.2" 是一个专门用于Web自动化测试的工具，它扩展了Watir（Web Application Testing in Ruby）的功能，提供了一系列额外的便利特性，旨在简化和增强网页应用的自动化测试过程。这个版本是1.5.2，表明...
watir-backend
03-06
4. **浏览器自动化**：通过Watir-Backend，开发者可以编写脚本模拟用户行为，如点击按钮、填写表单、执行JavaScript、处理弹窗和对话框等。 5. **测试驱动开发(TDD)**：Watir-Backend常用于TDD流程，编写自动化测试...
WATIR-WEBDRIVER自动化学习指导
10-20
WATIR-WEBDRIVER自动化测试指导
GESP:2024-6月等级3-T2-寻找倍数
lmy20121108的博客
07-10 389
小杨有一个包含n个正整数的序列A={a1,a2,...an}，他想知道是否存在i(1<=i<=n),使得ai是序列A中所有数的倍数。
AsyncRequestTimeoutException
wangqiaowq的博客
07-10 172
这个异常通常是由于服务器端的处理时间超过了客户端允许的等待时间，或者是服务器本身的异步处理时间配置过短导致的。在Spring MVC中，当一个异步请求超过配置的最大等待时间时，会抛出。
商城自动化测试实战 —— 登录+滑块验证
m0_47485438的博客
07-10 263
hello大家好，我是你们的小编！本商城测试项目采取PO模型和数据分离式架构，采用pytest+selenium+jenkins结合的方式进行脚本编写与运行，项目架构如下：
MVVN框架
最新发布
Dream的博客
07-11 448
负责连接View和Model。如上所示，其中，点击事件内的逻辑处理换到了ViewModel内，添加了count的observe（）方法，这个方法就是用来观察数据的变化。LiveData是AndroidX中JetPack提供的一种响应式编程组件，可以包含任何数据，并在数据变化的时候通知观察者，以便实现View与Model的数据相绑定。独立于界面，可以在多个界面中共享，用于提供数据和处理数据的方法，封装业务逻辑。如例所示，在ViewModel中可以使用LiveData实现将View与Model绑定的功能。
接口测试课程结构
土小帽_Tester的博客
07-09 125
接下来的阶段课程
watir-webdriver ssh
05-19
Watir-Webdriver is a Ruby library for automating web browsers. It provides a simple and intuitive API for interacting with web pages and can be used for tasks such as testing, web scraping, and automation. SSH (Secure Shell) is a protocol used for secure communication between two computers. It allows remote access and control of a computer over a network. There is no direct relationship between Watir-Webdriver and SSH, as they are two different technologies. However, it is possible to use SSH to remotely control a computer running Watir-Webdriver, allowing you to automate web browsing on a remote machine.

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值