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

traning

rt

Gasgoo

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

此方法对word table无用，我已经解决了