traning 发表于 2011-4-26 16:43:07

qtp 如何读/写word 表格的数据?

rt

Gasgoo 发表于 2011-4-26 16:56:00

本帖最后由 Gasgoo 于 2011-4-26 17:00 编辑

editword "filepath",content
function editword(filepath,content)
set wd=createobject("word.application")
   wd.visible=true
set wdapp=wd.documents.open(filepath)
    wdapp.content=content
wdapp.save()
set wd=nothinig
set wdapp=nothing
end function
可以把要写入的内容放在 editword函数的参数中。

read同样是声明word对象,打开一个word文档,
set wd=createobject("word.application")
   wd.visible=true
set wdapp=wd.documents.open(filepath)
    然后再输出文档内容
msgbox   wdapp.content
然后释放对象

traning 发表于 2011-4-26 18:04:50

此方法对word table无用,我已经解决了
页: [1]
查看完整版本: qtp 如何读/写word 表格的数据?