1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41
|
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
|