现要保存实时数据，每隔10分钟生成一个以当前时间为文件名的文本文件，请问怎么实现？谢谢

不知道你程序的结构如何。
像这种的程序，我一般这样写。

数据写入部分，仅数据写入，指定写入某个文件号。

if fileopenyesno  then
    print #1,数据
end if

文件打开，用定时器打开，打开时并且设一个标志位。
fileopenyesno = false
close #1
open time & ".log" for append as #1
fileopenyesno = true

路过、学习

问的太不细了吧，都不知道如何回答

    Set Fso = CreateObject("Scripting.FileSystemObject")
    Fso.CreateTextFile App.Path & "\" & Now() & ".txt"