Watir
子木清风
测试技术
展开
-
调用reporter文件进行操作
$:<<(File.expand_path(File.join(File.dirname(__FILE__),'..','..','..','a'))).gsub("/",'\\')require 'reporter'#参见 使用win32ole操作Excel-2=begin #******************************************************原创 2011-11-15 13:23:54 · 626 阅读 · 0 评论 -
Watir中Select_list支持的方法
require 'watir'$ie= Watir::IE.new$ie.goto("http://members.shaw.ca/paul_rogers/watir_tests/selectboxes1.html")#re = $ie.radio(:name,"box3").attribute_value("CHECKED")#$ie.select_lists.each {|d| pu原创 2011-11-15 13:28:36 · 1293 阅读 · 0 评论 -
操作XML文件
# 操作函数:require 'rexml/document'require 'pathname'include REXMLfilePath = File.join(Pathname.new(File.dirname(__FILE__)).realpath,'book.xml')# 创建一个文件对象input = File.new(filePath)# 解析XML文件 input原创 2011-11-15 13:15:24 · 767 阅读 · 1 评论 -
使用win32ole进行页面加载和跳转
require "win32ole" #包含库ie = WIN32OLE.new('internetExplorer.Application')ie.visible = true #这个时候就可以看到一个ie的界面出来了ie.navigate('http://mail.163.com') #转到这个页面sleep(0.1) until ie.busy == false #s原创 2011-11-15 13:21:57 · 701 阅读 · 0 评论 -
在指定目录下创建一个txt文件
#功能说明: #- 在指定目录下创建一个txt文件 # #参数说明: #- path:原文件路径,如果原文件路径不存在,系统自动创建相应路径 #- flag:当文件已存在时,指定处理的方式,"a+":不清空原文件 , "w+":先清空原文件 # #调用示例: #- $TxtClass.Create原创 2011-11-15 20:01:04 · 4813 阅读 · 0 评论 -
解决Ruby的Oracle接口读写超过4K字符串的问题
require 'dbi'require 'oci8'@dbh = DBI.connect("dbi:OCI8://server/orcl", 'apollo', 'yotop1508', 'AutoCommit' => false)@dbh.do("DELETE FROM ytapl_tableviews WHERE viewid = 25")@dbh.execute("INS原创 2011-11-15 20:00:02 · 523 阅读 · 0 评论 -
获取对象属性值的方法
方法1:require 'watir'$ie = Watir::IE.new$ie.goto 'http://www.google.cn/'def messlg(value,re) x=[] $ie.text_field(:name=>value).to_s.each do |d| x.unshift(d) end0.upto(x.length-1) do |t原创 2011-11-15 19:59:11 · 686 阅读 · 0 评论 -
判断是否选中radion
#判断是否选中radionrequire 'watir'$ie= Watir::IE.new$ie.goto("http://members.shaw.ca/paul_rogers/watir_tests/radioButtons1.html")# 选中radio 操作$ie.radio(:name,"box1").click# 判断是否被选中re = $ie.radio(:原创 2011-11-15 13:29:07 · 785 阅读 · 0 评论 -
watir应用实例
$:.unshift File.join(File.dirname(__FILE__),'..','config_file')require 'watir'require 'url_path_config'Watir::Browser.default ='ie'$ie= Watir::Browser.new$ie.maximize()$ie.goto @path$a =$ie原创 2011-11-15 13:33:35 · 1284 阅读 · 1 评论 -
使用win32ole操作Excel-1
class ExcelOs require 'win32ole'=begin' ** 函数名: CompareExcelSheet()' ** 输 入: Excelvalue,filePath,sheetname,rowNum,colNum' ** 功能描述: 比较2个excel 'excelPath1 第一个E原创 2011-11-15 11:40:10 · 2246 阅读 · 0 评论 -
使用win32ole操作Excel-2
require 'win32ole'class Engines def time_now initialize @t =Time.now a = @t.to_s.split(" ") s = a[-1].to_s+'-'+"#{@t.mon}"+'-'+a[2].to_s @time_now= s+' '+a[3].to_s #@time_原创 2011-11-15 11:43:12 · 4037 阅读 · 0 评论 -
OCI操作数据库
DatebaseOs函数:require 'oci8'=beginrequire "yaml"require 'pathname'require 'DatebaseOs'file_path=File.join(Pathname.new(File.dirname(__FILE__)).realpath,'yaml.yml')open_file =File.open(file_pat原创 2011-11-15 13:12:41 · 892 阅读 · 0 评论 -
操作Yaml文件
#yaml文件:test_obj: host: 192.168.5.93 port: 1521 user: test3 password: srttest3 server: SERVICE_NAME=mcrm test_obj1: host: 192.168.5.93 port: 1521原创 2011-11-15 13:13:48 · 1455 阅读 · 0 评论 -
使用win32ole统计IE个数
# 统计IE个数require 'win32ole'i=0mgmt = WIN32OLE.connect('winmgmts:\\\\.')processes=mgmt.instancesof("win32_process")processes.each do |process| if process.name =="IEXPLORE.EXE" then原创 2011-11-15 13:20:16 · 571 阅读 · 0 评论 -
遍历符合某种链接地址的link数
require 'watir'$ie=Watir::IE.new$ie.goto "http://www.baidu.com/"a=[]b=[]i=0$ie.table(:id,"l").links.each {|d| a<<d }a.each do |x|b=x.to_s.split(" ")c=b.rindex("href:").to_iif b[c+1]=~/.bai原创 2011-11-15 19:57:49 · 396 阅读 · 0 评论 -
3种链接数据库的方式
# 三种链接数据库的方式:OCI DBI Activerecordrequire 'activerecord'ActiveRecord::Base.establish_connection( :adapter => 'oracle', :database => "test3_srttest3", :username => "test3", :passw原创 2011-11-15 13:19:27 · 510 阅读 · 0 评论 -
Watir 进行对象识别方式
#单属性查询 #当页面中某对象可以由某个属性唯一标识时,可以用单属性查询法。其语法遵循$ie.object_class(:, “ ” ), 如 $ie.button(:id, "submit").exists? $ie.div(:id, "div3").exists? $ie.image(:alt , "flower" ).exists原创 2011-11-15 13:27:09 · 942 阅读 · 0 评论