14 lines
585 B
Plaintext
14 lines
585 B
Plaintext
files #f, DefaultDir$ + "\*.*" ' RunBasic Default directory.. Can be any directroy
|
|
print "rowcount: ";#f ROWCOUNT() ' how many rows in directory
|
|
#f DATEFORMAT("mm/dd/yy") 'set format of file date or not
|
|
#f TIMEFORMAT("hh:mm:ss") 'set format of file time or not
|
|
count = #f rowcount()
|
|
for i = 1 to count ' loop thru the row count
|
|
print "info: ";#f nextfile$() ' file info
|
|
print "name: ";#f NAME$() ' Name of file
|
|
print "size: ";#f SIZE() ' size
|
|
print "date: ";#f DATE$() ' date
|
|
print "time: ";#f TIME$() ' time
|
|
print "isdir: ";#f ISDIR() ' 1 = is a directory
|
|
next
|