See if this help:
http://support.microsoft.com/default.aspx?scid=kb;en-us;251133>Also.. often error happen on method .ExecWB
>
>OLE error code 0x80040100: Trying to revoke a drop target that has not been registered.
>Sometimes it happen.. sometimes no
>
>Denis.
>
>
>>See Thread #
795983 Message #
796642>>
>>
>>>Privet Sergey,
>>>Thanks for reply. Question. Is it possible to keep IE window visible false and show only print preview?
>>>
>>>Den.
>>>
>>>>>Hi,
>>>>>Is there way to call Internet Explorer "Print Preview" window. I generate report into HTML file and want to call IE Print Preview window before print.
>>>>>
>>>>
oIE = Createobject('internetexplorer.application')
>>>>oIE.Visible = .T.
>>>>oIE.Navigate("http://www.levelextreme.com")
>>>>ccOLECMDID_PRINTPREVIEW = 7
>>>>ccLECMDEXECOPT_DONTPROMPTUSER = 2
>>>>oIE.ExecWB(ccOLECMDID_PRINTPREVIEW, ccLECMDEXECOPT_DONTPROMPTUSER)
>>>>
For full list of constant see
http://atoutfox.org/articles.asp?ACTION=FCONSULTER&ID=0000000032