51Testing软件测试论坛

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

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 1543|回复: 4
打印 上一主题 下一主题

[原创] 关于vbs中继续写文件的一个问题

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2010-7-1 16:39:30 | 只看该作者 回帖奖励 |正序浏览 |阅读模式
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"等等,谢谢!上面的代码每次都会把已有内容覆盖掉
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

5#
发表于 2010-7-2 17:26:03 | 只看该作者
因为有自动转换,所以碰一起了
空值用IsEmpty判断比较好
回复 支持 反对

使用道具 举报

该用户从未签到

4#
 楼主| 发表于 2010-7-2 15:22:40 | 只看该作者

回复 2# 的帖子

搞定了,谢谢
不过想问一下,为什么在vbs中0和空值是相等的?
Dim A(1)
if 0=A(0) then
msgbox 123
end if
这段代码是可以打印出来123得
回复 支持 反对

使用道具 举报

该用户从未签到

3#
发表于 2010-7-1 18:04:03 | 只看该作者
append mode
回复 支持 反对

使用道具 举报

该用户从未签到

2#
发表于 2010-7-1 17:17:07 | 只看该作者
Set objFile = objFSO.OpenTextFile(LogFile, 8,true)
回复 支持 反对

使用道具 举报

本版积分规则

关闭

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

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

GMT+8, 2024-11-24 02:07 , Processed in 0.070170 second(s), 28 queries .

Powered by Discuz! X3.2

© 2001-2024 Comsenz Inc.

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