共享代码——航班预订管理系统UFT脚本代码

最新推荐文章于 2024-03-23 21:33:03 发布

liyang19931127

最新推荐文章于 2024-03-23 21:33:03 发布

阅读量1.5k

点赞数

分类专栏：程序代码

本文链接：https://blog.csdn.net/liyang19931127/article/details/49405613

版权

本文档提供了一段使用UFT编写的脚本，用于自动化操作航班预订管理系统。包括登录、新建订单、打开订单和退出系统的流程。脚本使用了环境变量、数据表和各种控件交互，如输入日期、选择飞行路线、输入订票信息，并进行了详细的数据验证。同时，脚本还包含了发送传真的功能。

摘要由CSDN通过智能技术生成

01_Login

'判断并结束flight4a.exe进程
Set objWMIService = GetObject("winmgmts:\\.\root\cimv2") ' 建立任务管理对象，遍历进程
Set colProcessList=objWMIService.ExecQuery ("select * from Win32_Process where Name='flight4a.exe' ") ' 查找filght4a.exe进程
For Each objProcess in colProcessList ' 循环
objProcess.Terminate() ' 结束进程
Next
Systemutil.Run "C:\Program Files (x86)\HP\Unified Functional Testing\samples\flight\app\flight4a.exe" ' 运行flight4a.exe
' 从外部导入表
Dim rownum
rownum=DataTable.GetSheet("Global").GetRowCount
If rownum=0 Then
DataTable.Import "..\table.xls"
End If
' 登陆系统（使用环境变量登陆）
Dialog("Login").Activate
Dialog("Login").WinEdit("Agent Name:").Set Environment("AgentName") ' 将AgentName定义成环境变量，从xml表中读值
Dialog("Login").WinEdit("Password:").SetSecure Environment("Password") ' 将Password定义为环境变量，从xml表中读值
Dialog("Login").WinButton("OK").Click

02_New_Order

' 新建订单
Window("Flight Reservation").Activate
Window("Flight Reservation").WinButton("New").Click
Window("Flight Reservation").ActiveX("MaskEdBox").Type DataTable("p_KeyboardInput", dtLocalSheet) ' 从本地表读入日期数据
Window("Flight Reser