51Testing软件测试论坛

标题: 再次请教:怎么在QTP写文件? [打印本页]

作者: yuandjing    时间: 2007-4-16 11:24
标题: 再次请教:怎么在QTP写文件?
open "E:\YDL-Work\2007-4-16\测试报告.txt"  for  append as #1
print #1,"**************************************************************************************"+CHR(13)+CHR(10)
print #1,"测试用例"+list+":"+CHR(13)+CHR(10)

这三行都报错   Expected Statement
是什么原因

谢谢各位仁兄
作者: 风过无息    时间: 2007-4-16 12:22
你看看我的BLOG,里面有一篇文章就是关于怎么往TXT文件读写的脚本.
作者: sidneylover    时间: 2007-4-16 12:37
ROBOT里面这样写文件的
作者: marco    时间: 2007-4-16 14:45
怪不得很熟悉,原来时robot里面这样写的!
QTP这样写肯定时不行的
作者: yuandjing    时间: 2007-4-16 17:01
Set fso = CreateObject("Scripting.FileSystemObject")
Set tf = fso.CreateTextFile("E:\YDL-Work\2007-4-16\测试报告.txt", True)
tf.WriteLine("**************************************************")
tf.WriteBlankLines(1)
tf.Write "测试用例"+list+":"
我现在用fso的办法能写文件了,但是不能append,各位DX有append的方法吗?
帮助手册也没有说,只有write、writeline、read谢谢各位
作者: yuandjing    时间: 2007-4-16 17:02
我在“风过无息 ”兄的博客找到append方法了,谢谢啦
作者: danmy    时间: 2007-4-17 12:20
hehe,多按F1




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