08-28-2010, 09:05 AM
This is my code until now..
typelib Word {00020905-0000-0000-C000-000000000046} 8.0 0x409
Word.Application app._create
app.Visible = TRUE
Word.Documents docs=app.Documents
VARIANT d=_s.expandpath("$desktop$\test.doc")
Word.Document doc=docs.Add
;;;-------------------------------
Word.Range rng
rng.Start=0
;;;-------------------------------
doc.SaveAs(d)
;exit
;app.Quit
