51Testing软件测试论坛

标题: 自动化测试日志的生成 [打印本页]

作者: fsweicaixia    时间: 2014-5-28 17:58
标题: 自动化测试日志的生成
自动化测试日志怎么设计 ,要将测试报告发送给其他人员看的。
作者: clack-kent    时间: 2014-6-5 09:24
我这边有个方法,有点笨,发你看看是否需要采用:        Dim fso, logFile
        Set fso = CreateObject("Scripting.FileSystemObject")
        Set logFile = fso.OpenTextFile("D:\陈元元\QTP脚本\Demo\log\runtime.txt", 8, True)'自行修改你自己本地的日志路劲,在路劲里面新建一个txt文本即可

logFile.WriteLine("+++++++++++++++++++++++++++++++++++++++++++++++++++

logFile.WriteLine("+++++++++++++++++++++++++++++++++++++++++++++++++++")

logFile.WriteLine("+++++++++++++++++++++++++++++++++++++++++++++++++++")     
                logFile.Close
          'Public Function ErrorHandle()
           If Err.Number <> 0 Then
               logFile.WriteLine( "Error Num: " & Err.Number & "; Error Src: " & Err.Source & "; Error Desc: " & Err.Description)          '报错处理
                Err.Clear
        End If
作者: clack-kent    时间: 2014-6-5 09:26
回复 2# clack-kent

把里面的代码复制到QTP砖家视图界面即可,在你需要输出日志的地方把logfile.writeline即可
作者: fsweicaixia    时间: 2014-7-1 14:03
不了  这是最基础的日志  我说的是  框架测试报告  执行了多少测试用例  通过多少  失败多少  等等比较全面的报告, 谢谢啊
作者: yinhuanping    时间: 2014-9-2 10:48
为什么我执行这条语名  fso = CreateObject("Scripting.FileSystemObject"), 系统提示“系统不支持此属性或方法”




欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/) Powered by Discuz! X3.2