1 require 'win32ole'
2 def oletypelib_name(pat)
3 WIN32OLE_TYPE.typelibs.each do |lib|
4 return lib if pat =~ lib
5 end
6 end
7 module OLESERVER
8 MS_EXCEL_TYPELIB = oletypelib_name(/^Microsoft Excel .* Object Library$/)
9 MS_XML_TYPELIB = oletypelib_name(/^Microsoft XML/)
10 end