实训外部数据读写操作.docVIP

实训 外部数据读写操作 1.1实训目标 掌握外部文本文件读写操作方法 能够使用外部文件中的数据作为数据驱动测试的数据源 1.2任务描述 使用外部文本文件中的数据作为用户登录Flight飞机订票系统的用户名和密码 1.3覆盖的知识点 VBS对文本文件的追加、修改、删除、读取操作 1.4实训参考步骤 ************************************ 函数功能：检查文件是否存在 输入参数： pathway - 文件全路径 返回值： 如果文件存在，返回True，否则返回False 示例调用： MsgBox CheckFileExists(D:\test.txt) ************************************* Function CheckFileExists (FilePath) dim oFSO Set oFSO = CreateObject (Scripting.FileSystemObject) CheckFileExists = oFSO.FileExists(FilePath) Set oFSO = Nothing End Function ************************************ 函数功能：如果文件夹不存在则创建文件夹 输入参数： fldr - 文件夹全路