RosettaCodeData/Task/File-size/VBScript/file-size.vb

5 lines
140 B
VB.net
Raw Permalink Normal View History

2014-01-17 05:32:22 +00:00
With CreateObject("Scripting.FileSystemObject")
WScript.Echo .GetFile("input.txt").Size
WScript.Echo .GetFile("\input.txt").Size
End With