DECLARE INTEGER FindWindow IN WIN32API ; STRING lpclassname, STRING lpCaption lchtml="" if oShell.AppActivate(oIE.Document.title) oShell.SendKeys("%Vc") &&get source html to notepad WAIT WINDOW TIMEOUT 2.0 "" lhWnd = FindWindow("Notepad", 0) ?lhWnd if lhWnd#0 AND SetActiveWindow(lhWnd)=0 ??"Activated" oShell.SendKeys("^+{END}^C") &© to clipboard from notepad lchtml=_cliptext WAIT WINDOW TIMEOUT 2.0 "" oShell.SendKeys("%Fx") &&close notepad endif else * ..... ENDIFOther than that, there was a solution like:
*Anatoliy Mogylevets cRequest = "http://www.microsoft.com" cTargetFile = 'c:\txt.txt' IF DownloadRemote(cRequest, cTargetFile) MODI FILE (cTargetFile) NOWAIT ENDIF FUNCTION DownloadRemote(cRequest, cTargetFile) LOCAL lResult DECLARE INTEGER URLDownloadToFile IN urlmon; INTEGER, STRING, STRING, INTEGER, INTEGER WAIT WINDOW NOWAIT "Downloading remote file..." lResult = (URLDownloadToFile (0, cRequest, cTargetFile, 0,0) = 0) WAIT CLEAR RETURN lResult>Hello,