ruby--ruby/test/win32ole/available_ole.rb

42 lines
1.1 KiB
Ruby

begin
require 'win32ole'
rescue LoadError
end
if defined?(WIN32OLE)
module AvailableOLE
module_function
def sysmon_available?
WIN32OLE_TYPE.new('System Monitor Control', 'SystemMonitor')
true
rescue
false
end
def ado_available?
WIN32OLE.new('ADODB.Connection')
true
rescue
false
end
def msxml_available?
!WIN32OLE_TYPELIB.typelibs.find { |t| t.name.start_with?('Microsoft XML') }.nil?
end
def event_param
method = if msxml_available?
typelib = WIN32OLE_TYPELIB.typelibs.find { |t| t.name.start_with?('Microsoft XML') }
ole_type = WIN32OLE_TYPE.new(typelib.name, 'IVBSAXContentHandler')
WIN32OLE_METHOD.new(ole_type, 'startElement')
elsif ado_available?
typelib = WIN32OLE.new('ADODB.Connection').ole_typelib
ole_type = WIN32OLE_TYPE.new(typelib.name, 'Connection')
WIN32OLE_METHOD.new(ole_type, 'WillConnect')
end
method && method.params[0]
end
end
end