Office中国论坛/Access中国论坛

标题: 在ACCESS中如何建立一个空的文本文件? [打印本页]

作者: nzlwc_fsb 时间: 2006-7-12 07:12
标题: 在ACCESS中如何建立一个空的文本文件?
在ACCESS中如何建立一个空的文本文件?或把一个文本文件的内容清空?

作者: andymark 时间: 2006-7-12 07:40
执行下面代码就自动生成一个test.txt的文本文件,也可以用CreateTextFile

Open CurrentProject.Path & "\" & "test.txt" For Output As #1

作者: fan0217 时间: 2006-7-12 07:49

使用FSO也可以，主要引用MS Scripting Runtime

Dim objFS As FileSystemObject

Set objFS = CreateObject("Scripting.FileSystemObject")
objFS.CreateTextFile "C:\ABC.txt", False

作者: nzlwc_fsb 时间: 2006-7-12 15:19
谢谢2位

但再点击一下时会显示已打开文件,应加入关闭文件的语句才行,应怎样写呢?

作者: wwwwa 时间: 2006-7-12 16:01
Open CurrentProject.Path & "\" & "test.txt" For Output As #1

Close #1

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)