例: FileDateTime function

' This script creates a file called data.txt
' and prints its creation date and time.

%Include "lsconst.lss"
Dim fileName As String, fileNum As Integer
fileNum% = FreeFile()
fileName$ = "data.txt"
Open fileName$ For Output As fileNum%   ' Create data.txt file.
Close fileNum%
Print fileName$; " Created on "; FileDateTime(fileName$)