PROGRAM-20

print files in a folder
Set fso=createobject ("scripting.filesystemobject")
Set fdo=fso.getfolder("E:\biswa")
Set flsc=fdo.files
print("no of files:"& flsc.count)
For each fl in flsc
print (fl.name)
Next