DEFINITIONS
This source file includes following functions.
1 require 'win32ole'
2
3 ie = WIN32OLE.new('InternetExplorer.Application')
4 =begin
5 WIN32OLE.const_load(ie)
6 WIN32OLE.constants.sort.each do |c|
7 puts "#{c} = #{WIN32OLE.const_get(c)}"
8 end
9 =end
10
11 module IE_CONST
12 end
13
14 WIN32OLE.const_load(ie, IE_CONST)
15 IE_CONST.constants.sort.each do |c|
16 puts "#{c} = #{IE_CONST.const_get(c)}"
17 end
18
19 #------------------------------------------------------------
20 # Remark!!! CONSTANTS has not tested enoughly!!!
21 # CONSTANTS is alpha release.
22 # If there are constants which first letter is not [a-zA-Z],
23 # like a '_Foo', then maybe you can access the value by
24 # using CONSTANTS['_Foo']
25 #------------------------------------------------------------
26 IE_CONST::CONSTANTS.each do |k, v|
27 puts "#{k} = #{v}"
28 end
29
30 puts WIN32OLE::VERSION
31 ie.quit
32