如何运行一个MS Word?

下面的代码可以运行并中止一个MS Word:

Set WSHShell = WScript.CreateObject("WScript.Shell")
'创建MS Word对象
Set appWord = Wscript.CreateObject("Word.Application") '显示MS Word
appWord.Visible = TRUE ' Open a sample document.
appWord.Documents.Open("C:\Resume.doc")
WSHShell.popup "现在已经打开了word,下面的代码是为了关闭Word而设置的"
'退出MS Word
Set appWord = Nothing