51Testing软件测试论坛

标题: 关于vbs中继续写文件的一个问题 [打印本页]

作者: gdutlzl 时间: 2010-7-1 16:39
标题: 关于vbs中继续写文件的一个问题
LogFile = "E:\fso\2.txt"
  Set objFSO = CreateObject("Scripting.FileSystemObject")
  Set objFile = objFSO.OpenTextFile(LogFile, 2,true)
  objFile.WriteLine "this is the first line"& Now
  objFile.Close
  我想问一下，如果我写完这一句，下次打开这个文件想接着已有内容继续写怎么办啊?比如"this is the second line"等等,谢谢！上面的代码每次都会把已有内容覆盖掉

作者: skyzhu 时间: 2010-7-1 17:17
Set objFile = objFSO.OpenTextFile(LogFile, 8,true)

作者: kettleyang 时间: 2010-7-1 18:04
append mode

作者: gdutlzl 时间: 2010-7-2 15:22
标题: 回复 2# 的帖子
搞定了，谢谢
不过想问一下，为什么在vbs中0和空值是相等的？
Dim A(1)
if 0=A(0) then
msgbox 123
end if
这段代码是可以打印出来123得

作者: skyzhu 时间: 2010-7-2 17:26
因为有自动转换，所以碰一起了
空值用IsEmpty判断比较好

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)