一些QTP比较实用的方法

1 生产随机数列
第一种方法

CODE:

    randomize'更新反回的数据
    funcation rand(k,n)
        n=int((k-1)*rnd+1)
        rand=n
    end funcation

第二种方法

CODE:

    n=randomnumber.value(1,255)

2  当运行到表中的某一行，自动导出表中的所有数据

CODE:

    row=datatable.getcurrentrow
    if row="5" then
        datatable.export("d:\data.xml")
    end if

3

CODE:

    webedit("txtpass").setsecure"sdsdf...."

如果参数化密码，可以直接在数据表中写入未加密的密码，它会自动识别，即不用把setsecure改为set

4　如果弹出对话框就获取上面提示信息并与表中的信息对比，不统一证明弹出的提示出错,主要用来验证

    '判断一个窗口是否存在
    if(Dialog(dialog_name).exist=true) then
    else
    end if
    '判断一个窗口是否激活
    if(window("window_name").active=true) then
    else
    end if

    导入一个EXCEL表
    datatable.Import(excel_name)'将该excel文件中的表全部导入
    datatable.ImportSheet(excel_name,sheet_name)'导入excel中名字为sheet_name的sheet表
    导出一个EXCEL表
    datatable.ExportSheet(excel_name,sheet_name)或
    datatable.ExportSheet(excel_name,sheet_index)
    获取表中当前的行数
    datatable.GetCurrentRow
    获取表中总行数
    datatable.GetRowCount
    返回EXCEL中表的数量
    DataTable.GetSheetCount
    获取运行的表中的某个值或者设置该值
    DataTable.Value(colume_name,sheet_name)'获取colume_name列中的当前光标处的值
    DataTable.value(colume_name,sheet_name)＝New_Value'设置新值

    DataTable.GetSheet(sheet_name).GetParameter(colume_name).valueByRow(n)

    判断当前光标是否处于最后一列
    iRow=datatable.getCurrentRow
    if(dataTable.value(sheet_name).GetParameter(colume_name).ValueByRow(iRow)<>expected_value)     then
    for iRow=0 to iRow<datatable.getRowCount
        rowNum=iRow
    next
end if
判断一个窗口是否激活
    if(window("window_name").active=true) then
    else
    end if