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