lijingprince5 发表于 2013-2-21 15:28:48

QTP11.5还是没有实现对office word 2007以上的支持

用到FSO的时候发现:QTP11.5版本看来还是没有实现对office word 2007以上的支持, 对于excel 2007是支持的.

laoli0225 发表于 2013-2-27 23:37:26

本帖最后由 laoli0225 于 2013-2-28 18:12 编辑

FSO:全称为File System Object (文本文件系统对象),FSO是一个可以对系统文件进行操作的COM组件,可以帮助我们解决一些文本文件上的处理问题。而楼主想要读取word文件,以下代码仅供参考:
Dim wordapp,worddoc
'创建word对象
set wordapp=CreateObject("word.application")
'将word对象设置为可见 即打开word程序
wordapp.Visible=True
'增加一个新的文档
Set worddoc=wordapp.Documents.Add
'向文档中写入数据
wordapp.Selection.TypeText("Hello World!")
'文件另存为
worddoc.SaveAs("d:\test.docx")
'关闭文档
worddoc.Close
'退出程序
wordapp.Quit
'释放
Set worddoc=Nothing
Set wordapp=Nothing
页: [1]
查看完整版本: QTP11.5还是没有实现对office word 2007以上的支持