再次请教：怎么在QTP写文件？

yuandjing · 发表于 2007-4-16 11:24:59

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:06

你看看我的BLOG,里面有一篇文章就是关于怎么往TXT文件读写的脚本.

sidneylover · 发表于 2007-4-16 12:37:55

ROBOT里面这样写文件的

marco · 发表于 2007-4-16 14:45:44

怪不得很熟悉，原来时robot里面这样写的！
QTP这样写肯定时不行的

yuandjing · 发表于 2007-4-16 17:01:04

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:24

我在“风过无息 ”兄的博客找到append方法了，谢谢啦

danmy · 发表于 2007-4-17 12:20:41

hehe,多按F1

		自动登录	找回密码
密码			(注-册)加入51Testing

[原创] 再次请教：怎么在QTP写文件？

站长推荐 /1