diff options
| author | suke <suke@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2002-06-01 12:34:30 +0000 |
|---|---|---|
| committer | suke <suke@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2002-06-01 12:34:30 +0000 |
| commit | f14180707d83a9e15106952102d1853b441edabd (patch) | |
| tree | 2e9157b5d45f0aaba69eb211e6f9405671383419 /ext/win32ole/sample/ieconst.rb | |
| parent | 95a5a671426b974f5a394e8a5acddb5fecd72c69 (diff) | |
merge win32ole from rough
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@2508 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/win32ole/sample/ieconst.rb')
| -rw-r--r-- | ext/win32ole/sample/ieconst.rb | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/ext/win32ole/sample/ieconst.rb b/ext/win32ole/sample/ieconst.rb new file mode 100644 index 0000000000..234272c7ed --- /dev/null +++ b/ext/win32ole/sample/ieconst.rb @@ -0,0 +1,32 @@ +require 'win32ole' + +ie = WIN32OLE.new('InternetExplorer.Application') +=begin +WIN32OLE.const_load(ie) +WIN32OLE.constants.sort.each do |c| + puts "#{c} = #{WIN32OLE.const_get(c)}" +end +=end + +module IE_CONST +end + +WIN32OLE.const_load(ie, IE_CONST) +IE_CONST.constants.sort.each do |c| + puts "#{c} = #{IE_CONST.const_get(c)}" +end + +#------------------------------------------------------------ +# Remark!!! CONSTANTS has not tested enoughly!!! +# CONSTANTS is alpha release. +# If there are constants which first letter is not [a-zA-Z], +# like a '_Foo', then maybe you can access the value by +# using CONSTANTS['_Foo'] +#------------------------------------------------------------ +IE_CONST::CONSTANTS.each do |k, v| + puts "#{k} = #{v}" +end + +puts WIN32OLE::VERSION +ie.quit + |