diff options
Diffstat (limited to 'trunk/ext/win32ole/sample/ienavi2.rb')
-rw-r--r-- | trunk/ext/win32ole/sample/ienavi2.rb | 40 |
1 files changed, 0 insertions, 40 deletions
diff --git a/trunk/ext/win32ole/sample/ienavi2.rb b/trunk/ext/win32ole/sample/ienavi2.rb deleted file mode 100644 index 67977e28ab..0000000000 --- a/trunk/ext/win32ole/sample/ienavi2.rb +++ /dev/null @@ -1,40 +0,0 @@ -require 'win32ole' - -class IEHandler - attr_reader :loop - def initialize - @urls = [] - @loop = true - end - def method_missing(event, *args) - case event - when "BeforeNavigate2" - puts "Now Navigate #{args[1]}..." - end - end - def onNavigateComplete2(pdisp, url) - @urls << url - end - def onOnQuit - puts "Now Stop IE..." - @loop = false - end - def put_urls - puts "You Navigated the URLs ..." - @urls.each_with_index do |url, i| - puts "(#{i+1}) #{url}" - end - end -end - -ie = WIN32OLE.new('InternetExplorer.Application') -ie.visible = true -ie.gohome - -ev = WIN32OLE_EVENT.new(ie) -ev.handler = IEHandler.new - -while (ev.handler.loop) - WIN32OLE_EVENT.message_loop -end -ev.handler.put_urls |