word = CREATEOBJECT("Word.Application") doc = word.Documents.Open("d:\temp\tmp.txt") word.Selection.WholeStory word.Selection.Font.Name = "宋体" word.Selection.Font.Size = 12 word.ActiveDocument.SaveAs("d:\temp\tmp.doc", 0) doc.Close word.Quit
[此贴子已经被作者于2023-8-5 09:06编辑过]