Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Word Object code
#3
This is my code until now..
Code:
Copy      Help
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


Messages In This Thread

Forum Jump:


Users browsing this thread: 2 Guest(s)