51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 1806|回复: 5
打印 上一主题 下一主题

[原创] 请问创建日志函数WriteLineToFile(message)中message参数从何处来?

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2012-6-26 21:46:50 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
请问各位大虾:
1.创建日志函数WriteLineToFile(message)中message参数从何处来?
2.QTP日志文件放在哪里?reslut.xml文件有看到,但QTP log文件如何创建呢?
谢谢!
=================================
生成txt文件。这是从开发那边得到的启示。

        首先定义一个sub:
Public Sub WriteLineToFile(message)
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Dim fileSystemObj, fileSpec
Dim currentTime
currentDate = Date
currentTime = Time
testName = "log"
Set fileSystemObj = CreateObject("scrīpting.FileSystemObject")
fileSpec ="C:\" &testName& ".txt" 'change this according to your directory
If Not (fileSystemObj.FileExists(filespec)) Then
Set logFile = fileSystemObj.CreateTextFile(fileSpec, ForWriting, True)
logFile.WriteLine
("#######################################################################")
logFile.WriteLine (currentDate & currentTime & " Test: " & environment.Value("TestName") )
logFile.WriteLine
("#######################################################################")
logFile.Close
Set logFile = Nothing
End If
Set logFile = fileSystemObj.OpenTextFile(fileSpec,
ForAppending, False, True)
logFile.WriteLine (currentDate & currentTime & " " & message)
logFile.Close
Set logFile = Nothing
Set fileSystemObj = Nothing
End Sub
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

2#
发表于 2012-6-29 15:41:55 | 只看该作者
调用sub的时候  传入
回复 支持 反对

使用道具 举报

该用户从未签到

3#
 楼主| 发表于 2012-8-19 17:51:47 | 只看该作者
mesage应该是一条条的记录,哪里可以取得这个记录?
回复 支持 反对

使用道具 举报

该用户从未签到

4#
发表于 2012-8-20 13:41:15 | 只看该作者
"C:\" &testName& ".txt"
testName = "log"
系统判断该文件存在就打开往里面继续写log, 如果文件不存在就创建一个该名字的文件
message 是调用这个sub的时候传入的
currentDate & currentTime & " " & message 这是你输出到log中的值
回复 支持 反对

使用道具 举报

该用户从未签到

5#
发表于 2012-8-20 13:46:13 | 只看该作者
学习下...
回复 支持 反对

使用道具 举报

  • TA的每日心情
    奋斗
    2018-2-13 11:02
  • 签到天数: 55 天

    连续签到: 1 天

    [LV.5]测试团长

    6#
    发表于 2012-8-20 14:08:24 | 只看该作者
    message这个参数应该是你在执行功能模块或者你在执行测试用例后得到的一个结果,你要在执行的时候,自己记录这个结果,如果没有记录这个结果,那你调用这个WritelineToFile这个函数就会报错。你自己看看别的函数中或环境变量或者是action中有没有相关的参数,来记录运行结果

    希望可以帮到你
    回复 支持 反对

    使用道具 举报

    本版积分规则

    关闭

    站长推荐上一条 /1 下一条

    小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

    GMT+8, 2024-11-12 07:55 , Processed in 0.070178 second(s), 28 queries .

    Powered by Discuz! X3.2

    © 2001-2024 Comsenz Inc.

    快速回复 返回顶部 返回列表