小吳 VBQA 程式設計討論

幾個問題請教...
1.以下Word巨集內容程式碼要如何轉成VBScript語法執行...
Sub 轉檔()
ChangeFileOpenDirectory "D:\TEMP\"
Documents.Open FileName:="x.doc", ConfirmConversions:=False, ReadOnly:= _
False, AddToRecentFiles:=False, PasswordDocument:="", PasswordTemplate:= _
　　　　"", Revert:=False, WritePasswordDocument:="", WritePasswordTemplate:="", _
　　　　Format:=wdOpenFormatAuto
　　ChangeFileOpenDirectory "D:\TEMP2\"
　　ActiveDocument.SaveAs FileName:="x.txt", FileFormat:=wdFormatText, _
　　　　LockComments:=False, Password:="", AddToRecentFiles:=True, WritePassword _
　　　　:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:=False, _
　　　　SaveNativePictureFormat:=False, SaveFormsData:=False, SaveAsAOCELetter:= _
　　　　False
　　ActiveWindow.Close
End Sub
2.如何將FileFormat:=wdFormatText此行的參數設定以VBScript語法表示？
3.有辦法用VBScript程式把Word檔案的文字取出，並以變數儲存嗎？如果有的話要怎麼弄啊？
上面幾個問題我翻了一些書查詢，但還是沒辦法解決，麻煩幫我解答..