51Testing软件测试论坛

标题: 请问如何使用vbs修改已存在的word文档并保存？ [打印本页]

作者: xiaoyaoke 时间: 2007-10-25 15:49
标题: 请问如何使用vbs修改已存在的word文档并保存？
如题，请问如何能够使用vbs生成word文档并添加内容然后保存，这之间尽量不要弹出确认界面，而且最后还要保存word处在打开状态
望达人解答

作者: hsjzfling 时间: 2007-10-25 18:37
在运行你的vbs脚本前先在进程中关掉所有的winword.exe
或者在QTP中运行systemutil.CloseProcessByName "winword.exe"

至于你写入word的需求偶不是很清楚，以前也没往word中写过东西，刚写了几句也费了点时间，有别的需求楼主就自己添加吧
EditWord "C:\test.doc","51testing"
Function EditWord(filepath,content)
Set WordApp = CreateObject("Word.Application")
WordApp.Visible = True
Set doc = WordApp.Documents.Open(filepath)
doc.Content = content
doc.Save
Set doc = Nothing
Set WordApp = Nothing
ReadWord = True
End Function

作者: xiaoyaoke 时间: 2007-10-26 15:27
非常感谢，嘿嘿

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)