熟悉文件操作的高手请进来坐一下。

[rushing]

想把文件清空。该怎样操作？

Open strFileName For Output As #1 Len = 1024

[lly9900]

另外，大哥，知道文件怎样该名字吗？

[foolishtiger]

Open strFileName For Output As #1
Print #1,""
Close #1

[dbcontrols]

rename

[uguess]

1、把这个文件删掉，再建一个空的，不就“清空”了么？
2、Name 语句 重新命名一个文件、目录、或文件夹。
Dim OldName, NewName
OldName = "OLDFILE": NewName = "NEWFILE" ' 定义文件名。
Name OldName As NewName ' 更改文件名。


OldName = "C:\MYDIR\OLDFILE": NewName = "C:\YOURDIR\NEWFILE"
Name OldName As NewName ' 更改文件名，并移动文件。

[foolishtiger]

Open strFileName For Output As #1
Print #1,""
Close #1

[cornerxu]

Open strFileName For Output As #1
close #1
这个文件就已经清空了
文件复制就用Name语句就行

[rushing]

gf

[rushing]

为什么无法给分？

[uguess]

兄弟，不用给分的么？