diff options
Diffstat (limited to 'sample/win32ole/oledirs.rb')
-rw-r--r-- | sample/win32ole/oledirs.rb | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/sample/win32ole/oledirs.rb b/sample/win32ole/oledirs.rb new file mode 100644 index 0000000000..e52a0fd7ac --- /dev/null +++ b/sample/win32ole/oledirs.rb @@ -0,0 +1,24 @@ +# frozen_string_literal: false +# +# You need WSH(Windows Scripting Host) to run this script. +# + +require "win32ole" + +def listup(items) +# items.each do |i| + for i in items + puts i.name + end +end + +fs = WIN32OLE.new("Scripting.FileSystemObject") + +folder = fs.GetFolder(".") + +puts "--- folder of #{folder.path} ---" +listup(folder.SubFolders) + +puts "--- files of #{folder.path} ---" +listup(folder.Files) + |