停止更新,敏捷测试及TestOps解决体系,关注订阅号TestOps

QTP中的DataTable操作

上一篇 / 下一篇  2007-08-20 09:34:16 / 个人分类:自动化测试

51Testing软件测试网FW!u(O/jNF#oF

近日在对记事本进行研究的时候发现如果需要自动填写一篇文章,我们需要反复使用51Testing软件测试网#F T&Wy:xp

51Testing软件测试网6d!Rg{%u-Evn

 Window("记事本").WinEditor("Edit").Type <输入内容>

}l-X y\(` @}~*W0

`l r,sO:Jm}0来填写具体的内容,而换行的处理我们又要使用

9Bhod1g)T0

1F5FF r]0 Window("记事本").WinEditor("Edit").Type  micRuturn51Testing软件测试网.e"y8r]^Y z$ltG

51Testing软件测试网.L)cs,vG5C

在将输入内容参数化了后,我们怎么将整个文章自动换行进行输入呢?这里我们首先需要使用的是DataTable的指针51Testing软件测试网)\O?FXM

51Testing软件测试网N'`m7sD vM

1.参数化输入内容

I? t7`Xw io%g0 51Testing软件测试网Z`R j q

Window("记事本").WinEditor("Edit").Type DataTable("p_KeyboardInput", dtLocalSheet)

6p-U'GW+|.p n O0 51Testing软件测试网;u*PLpH&W? rm

2.获得Datatable的记录数,从而确定需要读取的数据有多少

B)wI!u.`U!N0 51Testing软件测试网Rs {&c I d^

这里我们可以通过DataTable.GetRowCount的方法来获得对应dtLocalSheet的记录数51Testing软件测试网SRw/V6IR

51Testing软件测试网7A-mX^ t#\/V"s

3.判断是否需要进行换行

^6O*H{6eb?N$F0

6K-|L`n N|0这里我使用换行符存放在Datatable中的方式,通过if语句进行判断51Testing软件测试网8g |%M1_M:@,Sw

.p+R.Q!d(no Ws#j^0  If   DataTable("p_KeyboardInput", dtLocalSheet) = "micReturn" Then
'P]wN/z0  Window("记事本").WinEditor("Edit").Type micReturn
-QM"_MO*R~[1pS\0 else51Testing软件测试网`,q3y-rB!~!z,o
  Window("记事本").WinEditor("Edit").Type DataTable("p_KeyboardInput", dtLocalSheet) 51Testing软件测试网u^V:p#PZ[
 End If

*m VfU#q H$U0 51Testing软件测试网1X*j|Cp*@

4.完成一行datatalbe的使用后,我们指针下移51Testing软件测试网 xm$O"c-~!l'K$G&{+V

_2ixg(Mv0DataTable.SetNextRow51Testing软件测试网C(_M.~%cJY

51Testing软件测试网u0cT/{)~Vn%i

5.通过循环完成对整个datatable的调用51Testing软件测试网frV h%P}

51Testing软件测试网`3w,B,w5D`'R

For i=1 to DataTable.GetRowCount51Testing软件测试网O"^lYH

2GAk e1reCx0Next51Testing软件测试网*z;@U!^WI9{;|9@

H1LaV|Vo+a+p0最后注意设置该action的运行只进行一次哦,否则会反复运行将整个datatable的数据再运行一次51Testing软件测试网i,{W(s ]~e


TAG: QTP

引用 删除 wenfindword   /   2012-12-04 17:35:30
请问一个问题,你这个参数应该是 string类型的,如果参数是 object类型的,该怎么办呢????
luofeng1990的个人空间 引用 删除 luofeng1990   /   2012-07-30 16:09:08
3
引用 删除 suqing   /   2010-06-11 16:32:03
云层老师,最需要的时候看到了这个,居然把以前学到的给忘了
杯具
老三玩测试 引用 删除 杀手要低调   /   2009-01-09 13:54:47
汗~老师真汗~~
bbsvbvf的个人空间 引用 删除 bbsvbvf   /   2007-11-24 00:11:56
老师,可真强啊!!
 

评分:0

我来说两句

Open Toolbar