107 lines
3.6 KiB
Python
107 lines
3.6 KiB
Python
|
# testExplorer -
|
||
|
|
||
|
import sys
|
||
|
import os
|
||
|
import win32com.client.dynamic
|
||
|
from win32com.client import Dispatch
|
||
|
import win32api
|
||
|
import win32gui
|
||
|
import win32con
|
||
|
import winerror
|
||
|
import glob
|
||
|
import pythoncom
|
||
|
import time
|
||
|
from win32com.test.util import CheckClean
|
||
|
|
||
|
bVisibleEventFired = 0
|
||
|
|
||
|
class ExplorerEvents:
|
||
|
def OnVisible(self, visible):
|
||
|
global bVisibleEventFired
|
||
|
bVisibleEventFired = 1
|
||
|
|
||
|
def TestExplorerEvents():
|
||
|
global bVisibleEventFired
|
||
|
iexplore = win32com.client.DispatchWithEvents("InternetExplorer.Application", ExplorerEvents)
|
||
|
iexplore.Visible = 1
|
||
|
if not bVisibleEventFired:
|
||
|
raise RuntimeError("The IE event did not appear to fire!")
|
||
|
iexplore.Quit()
|
||
|
iexplore = None
|
||
|
|
||
|
bVisibleEventFired = 0
|
||
|
ie = win32com.client.Dispatch("InternetExplorer.Application")
|
||
|
ie_events = win32com.client.DispatchWithEvents(ie, ExplorerEvents)
|
||
|
ie.Visible = 1
|
||
|
if not bVisibleEventFired:
|
||
|
raise RuntimeError("The IE event did not appear to fire!")
|
||
|
ie.Quit()
|
||
|
ie = None
|
||
|
print("IE Event tests worked.")
|
||
|
|
||
|
def TestObjectFromWindow():
|
||
|
# Check we can use ObjectFromLresult to get the COM object from the
|
||
|
# HWND - see KB Q249232
|
||
|
# Locating the HWND is different than the KB says...
|
||
|
hwnd = win32gui.FindWindow('IEFrame', None)
|
||
|
for child_class in ['TabWindowClass', 'Shell DocObject View',
|
||
|
'Internet Explorer_Server']:
|
||
|
hwnd = win32gui.FindWindowEx(hwnd, 0, child_class, None)
|
||
|
# ack - not working for markh on vista with IE8 (or maybe it is the
|
||
|
# lack of the 'accessibility' components mentioned in Q249232)
|
||
|
# either way - not working!
|
||
|
return
|
||
|
# But here is the point - once you have an 'Internet Explorer_Server',
|
||
|
# you can send a message and use ObjectFromLresult to get it back.
|
||
|
msg = win32gui.RegisterWindowMessage("WM_HTML_GETOBJECT")
|
||
|
rc, result = win32gui.SendMessageTimeout(hwnd, msg, 0, 0, win32con.SMTO_ABORTIFHUNG, 1000)
|
||
|
ob = pythoncom.ObjectFromLresult(result, pythoncom.IID_IDispatch, 0)
|
||
|
doc = Dispatch(ob)
|
||
|
# just to prove it works, set the background color of the document.
|
||
|
for color in "red green blue orange white".split():
|
||
|
doc.bgColor = color
|
||
|
time.sleep(0.2)
|
||
|
|
||
|
def TestExplorer(iexplore):
|
||
|
if not iexplore.Visible: iexplore.Visible = -1
|
||
|
iexplore.Navigate(win32api.GetFullPathName('..\\readme.htm'))
|
||
|
win32api.Sleep(1000)
|
||
|
TestObjectFromWindow()
|
||
|
win32api.Sleep(3000)
|
||
|
try:
|
||
|
iexplore.Quit()
|
||
|
except (AttributeError, pythoncom.com_error):
|
||
|
# User got sick of waiting :)
|
||
|
pass
|
||
|
|
||
|
def TestAll():
|
||
|
try:
|
||
|
try:
|
||
|
iexplore = win32com.client.dynamic.Dispatch("InternetExplorer.Application")
|
||
|
TestExplorer(iexplore)
|
||
|
|
||
|
win32api.Sleep(1000)
|
||
|
iexplore = None
|
||
|
|
||
|
# Test IE events.
|
||
|
TestExplorerEvents()
|
||
|
# Give IE a chance to shutdown, else it can get upset on fast machines.
|
||
|
time.sleep(2)
|
||
|
|
||
|
# Note that the TextExplorerEvents will force makepy - hence
|
||
|
# this gencache is really no longer needed.
|
||
|
|
||
|
from win32com.client import gencache
|
||
|
gencache.EnsureModule("{EAB22AC0-30C1-11CF-A7EB-0000C05BAE0B}", 0, 1, 1)
|
||
|
iexplore = win32com.client.Dispatch("InternetExplorer.Application")
|
||
|
TestExplorer(iexplore)
|
||
|
except pythoncom.com_error as exc:
|
||
|
if exc.hresult!=winerror.RPC_E_DISCONNECTED: # user closed the app!
|
||
|
raise
|
||
|
finally:
|
||
|
iexplore = None
|
||
|
|
||
|
if __name__=='__main__':
|
||
|
TestAll()
|
||
|
CheckClean()
|