Convert Autotext

S

Smitty9

I created the below VBS to try and convert Normal11.dot to the new dotx
format. However, I am unable to capture the Compatibility Message or don't
know how to add this. An help would be appreciated:

Set objWord=CreateObject("Word.Application")

Set objDoc=objWord.Documents.Open("c:\Normal11.dot")

WScript.Sleep 10000

objDoc.SaveAs("c:\AutoText.dotx")

objWord.Quit
 
Top