' This example requires MS WORD ' If you're using a localized version with a foreign language, ' you'll have to adjust the parameter names to match. ' Comments in italics indicate the old style syntax before ' type checking was disabled. You can choose either approach. '$ESCAPECHARS ON $Include "Rapidq.Inc" declare sub Navy CREATE Form AS QFORM Caption = "Viewer" Width = 400 Height = 400 Center AutoScroll=0 OnShow=Navy CREATE Explorer AS QOLECONTAINER Top=10 Width=Form.ClientWidth Height = Form.ClientHeight 'createObject(WebBrowser.1) END CREATE END CREATE 'Insert your initialization code here Form.ShowModal sub Navy Explorer.createObject(WebBrowser.1) Explorer.Navigate "C:\BAS\RAPIDQ\RQDPhlp\htm\RQDP Release 01\examples\ole\ide.htm" end sub