QTP中的DataTable操作

man16181

近日在对记事本进行研究的时候发现如果需要自动填写一篇文章，我们需要反复使用
       Window("记事本").WinEditor("Edit").Type <输入内容>
       来填写具体的内容，而换行的处理我们又要使用
       Window("记事本").WinEditor("Edit").Type micRuturn
       在将输入内容参数化了后，我们怎么将整个文章自动换行进行输入呢?这里我们首先需要使用的是DataTable的指针
       1.参数化输入内容
       Window("记事本").WinEditor("Edit").Type DataTable("p_KeyboardInput", dtLocalSheet)
       2.获得Datatable的记录数，从而确定需要读取的数据有多少
       这里我们可以通过DataTable.GetRowCount的方法来获得对应dtLocalSheet的记录数
       3.判断是否需要进行换行
       这里我使用换行符存放在Datatable中的方式，通过if语句进行判断

If  DataTable("p_KeyboardInput", dtLocalSheet) = "micReturn" Then          Window("记事本").WinEditor("Edit").Type micReturn         else          Window("记事本").WinEditor("Edit").Type DataTable("p_KeyboardInput", dtLocalSheet)         End If

       4.完成一行datatalbe的使用后，我们指针下移
       DataTable.SetNextRow
       5.通过循环完成对整个datatable的调用
       For i=1 to DataTable.GetRowCount
       Next
       最后注意设置该action的运行只进行一次哦，否则会反复运行将整个datatable的数据再运行一次
本文章来自中国IT实验室