about FileSystemObject.OpenTextFile()的一个问题。

yangzi 2003-06-18 01:33:35
我的vb程序用 FileSystemObject.OpenTextFile() 打开一个文本文件,写log.
每一次都打开文件,写log,关闭文件。

但是,等文件很大时,如果在FileSystemObjec.OpenTextFile()执行的同时,有另外一个编辑器(比如写字板)也打开那个文本文件.

vb程序就会出现一些莫名奇妙的runtime错误。而且用on error goto 跳不过去。


大家有什么主意阿。
...全文
52 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
yangzi 2003-06-18
  • 打赏
  • 举报
回复
my code:

Dim fso As Scripting.FileSystemObject
Dim tsmLog As TextStream

Set tsmLog = fso.OpenTextFile("c:\aaa.log", ForAppending, True)<======== error.
Msg = "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaavvvvvv"
tsmLog.WriteLine Msg

我没有看见FileSystemObject有openfile , loadfile这样的函数。
qingming81 2003-06-18
  • 打赏
  • 举报
回复
不能使用FileSystemObject.Loadfile吗?
qingming81 2003-06-18
  • 打赏
  • 举报
回复
如果还是有问题,直接写一段代码来读取算了。
zwbhyy 2003-06-18
  • 打赏
  • 举报
回复
用openfile应该没问题
再有问题就是你别的地方出错了
rainstormmaster 2003-06-18
  • 打赏
  • 举报
回复
用OpenFile试试

7,763

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧