FoxPro/Visual FoxPro - Visualizar archivo de word en formulario a traves de Ole Shell Explorer 2

ow = CREATEOBJECT("word.application")

owd = ow.Documents.Open("c:\tiendasys\nota.docx")

owd.SaveAs("c:\tiendasys\nota.pdf",17)

owd.Close()

owd = null

ow.Quit

ow = null

With thisform

.AddObject("oleWebBrowser","OleControl","Shell.Explorer.2")

.oleWebBrowser.Top = 0

.oleWebBrowser.Left = 0

.oleWebBrowser.Height = .Height - 80

.oleWebBrowser.Width = .Width

.oleWebBrowser.Navigate("c:\tiendasys\nota.pdf")

.oleWebBrowser.Visible = .T.

EndWith