Sergey,
here it is:
thisform.lchtml=thisform.makehtml()
WITH thisform.oWB
.Navigate("about:blank")
lnStartSeconds = SECONDS()
DO WHILE .ReadyState <> 4 ;
AND (SECONDS()-lnStartSeconds <= 1 )
DOEVENTS
ENDDO
.DOCUMENT.OPEN()
.DOCUMENT.WRITE(thisform.lchtml)
.DOCUMENT.CLOSE()
.visible=.t.
ENDWITH///>Peter,
>
>In my tests, your html works as expected in Web browser control. How do you load it?
>
>>the following code in the browser object does not work, but in IE and frontpage (which created code in the 1st place) it works as intended:
>>
>>TEXT TO lcHTML NOSHOW TEXTMERGE
>><html>
>>
>><head>
>><meta http-equiv="Content-Language" content="en-us">
>><meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
>><title>New Page 2</title>
>></head>
>>
>><body>
>>
>><p><a name="top"></a><a name="top" href="#bottom">GO BOTTOM</a></p>
>><p><a name="bottom"></a><a name="bottom" href="#top">GO TOP</a></p>
>></body>
>></html>
>>ENDTEXT
>>RETURN lcHTML
>>
>>
>>in the browser object if brings up a blank page: with this in it: blank#bottom if one click on go bottom hyperlink
>>
Peter Cortiel
