摘要: Dim fso ,fileConst forreading = 1,forwriting =2,foraddpending = 8Set fso = CreateObject("scripting.filesystemobject") '这里的true的设置用途,如果本地有log日志文件,直接进行添 阅读全文
posted @ 2016-07-03 09:12 alice云学习 阅读(209) 评论(0) 推荐(0) 编辑
摘要: '调用 添加日志函数writing "C:\Users\lcy\Desktop\UFTtest\logs\logs.txt","hello word!" '调用函数,存在两个参数:文件所在路径\添加日志内容Function writing(filepath,logs)Dim fso,file '定义 阅读全文
posted @ 2016-07-03 08:58 alice云学习 阅读(775) 评论(0) 推荐(0) 编辑
摘要: 第一种方法:ExecuteFile,利用该函数将外部vbs动态地加载进来,使测试脚本可以调用vbs文件的所有函数,调用语句写在下方,顺序不能颠倒,否则会报错。这个方法适用于QTP任何版本,但有个缺点,代码调试时不能跟踪到外部vbs的函数中,多少有些不便。 ExecuteFile File File 阅读全文
posted @ 2016-07-03 07:34 alice云学习 阅读(1675) 评论(0) 推荐(0) 编辑
摘要: Dim username,passwordDim expectvalue,actualvalueDim currentcount,casecountDim isystemutil.Run"C:\Program Files (x86)\HP\Unified Functional Testing\sam 阅读全文
posted @ 2016-07-03 06:54 alice云学习 阅读(256) 评论(0) 推荐(0) 编辑