package.cpath=[[D:\Tools\Lua\5.1\clibs\?.dll]]; require "luacom" excel=luacom.CreateObject("Excel.Application"); assert(excel); excel.Visible=true; workbook=excel.Workbooks:Add(); print("workbook=" .. tostring(workbook)); workbook_events={} function workbook_events:NewSheet(Sheet) print("Event: NewSheet", Sheet); end local res, cookie=luacom.Connect(workbook, workbook_events); print(res, cookie); luacom.StartMessageLoop()
package.cpath=[[C:\Program Files\Lua\5.1\clibs\?.dll]]; require "luacom"local browser=luacom.CreateObject('InternetExplorer.Application') browser.visible=truelocal browser_events={} function browser_events:DocumentComplete(d,url) print(d, url);end-- 自动从接口DWebBrowserEvents2接收DocumentComplete事件 res, cookie=luacom.Connect(browser, browser_events); print(res, cookie); browser:Navigate2("http://yahoo.com.cn"); luacom.StartMessageLoop() -- 加上这个才能正常的使用luacom.Connect
package.cpath=[[C:\Program Files\Lua\5.1\clibs\?.dll]]; require "luacom" function MyIE() local b=luacom.CreateObject('InternetExplorer.Application') b.visible=true local obj={ DocumentComplete=function(o, d,url) print(d, url); end, Go=function() b:Navigate2('http://www.google.co.uk') end } local meta={ __index = function(s,i) return rawget(s,i) or b[i]; end } setmetatable(obj,meta); obj.__eventobj=luacom.ImplInterface(obj, 'InternetExplorer.Application', 'DWebBrowserEvents2'); luacom.addConnection(b, obj.__eventobj); return obj; end m = MyIE() m.Go(); m:Navigate2("http://yahoo.com.cn"); luacom.StartMessageLoop();
Notes-6:LUA应用之利用luacom接收IE,Excel消息
最新推荐文章于 2022-06-16 10:30:51 发布