QTP学习笔记

标签：

1.QTP开启浏览器:

‘SystemUtil.Run"C:\Program Files\Internet Explorer\IEXPLORE.EXE","http://www.baidu.com"
SystemUtil.Run”http://www.baidu.com”

C:\Windows\system32\calc.exe

2.调用Vbs文件

Executefile ”C:\test.vbs”

3.VBS相关

Byref:按引用传参

Redim:重新申明动态数组

Const

4.读取DataTable

a.不支持xlsx文件

b.导入DataTable.Import ExcelFileName

获取行数:DataTable.GetRowCount()

设置当前行DataTable.SetCurrentRow(index)

获取当前行对应的值DataTable.Value("Step","Global")

5.Function与Sub

 Function name()

 Sub name()

 Sub无返回值,Function带返回值

6.文件操作

Function ReportFileStatus(filespec)

   Dim fso, msg

   Set fso = CreateObject("Scripting.FileSystemObject")

   If (fso.FileExists(filespec)) Then

      msg = filespec & " exists."

   Else

      msg = filespec & " doesn‘t exist."

   End If

   ReportFileStatus = msg

End Function

A.  创建excel文件

        Set ExcelApp=CreateObject("excel.application")

     ExcelApp.Workbooks.Add()
        ExcelApp.ActiveWorkbook.SaveAs(FileName)

        ExcelApp.Quit  

    Set ExcelApp = Nothing    
        SystemUtil.CloseProcessByName "Excel.exe" 

B.  判断文件是否存在

Set fso=createobject("scripting.filesystemobject")

fso.fileexists(FileName)

C.  打开Excel文件

Set ExcelApp=CreateObject("excel.application")
 Set ExcelBook=ExcelApp.Workbooks.Open(FileName)
 Set ExcelSheet=ExcelBook.Sheets.Add

‘修改sheet的名称
 ExcelSheet.Name="TestResult"

 ‘release the excel object        

 ExcelBook.Save  

 ExcelBook.Close  

  ExcelApp.Quit  
  Set ExcelBook = Nothing  
  Set ExcelApp = Nothing    

7.Byref &Byval

    Byref：按地址传递，值可变

    Byval:按值传递，值不可变

8.检查文本信息是否存在

    LoginErrMsg=Dialog("Flight Reservations").GetVisibleText

    Instr(1,LoginErrMsg,Steps.ExpectedResult)>0

9.中文字符处理

Qtp执行vbs脚本时,中文字符不支持时,将vbs改为ANSI编码后,修改中文

原因:qtp使用的编码方式为ANSI编码方式

QTP注释

         注释选中内容Ctr+M

         取消注释选中内容Ctr+shift+M

问题:

1.       Action中调用vbs时需要将vbs文件添加到Function Lib中,方法:settings/Resources,添加文件

2.       使用 Executefile filename(绝对路径,或相对路径)

3.       VBS调试较麻烦，将VBS放到action中进行调试

对象库的调用

获取输出结果

添加检查点

自动化框架

         Environment

         Libraries

         Object Repositories

         Setup Scripts

         Tests

         Data

QTP相关资料

http://www.cnblogs.com/testware/archive/2010/04/16/1713555.html

QTP学习笔记

标签：

原文地址：http://www.cnblogs.com/karin/p/4560178.html