论坛中的用vfp控制word表，导入到dbf表中
**** 要再能自动造表，不如吹版的简单（仅参考）
close all
cwj=ADDBS(SYS(5)+SYS(2003))+"文档.docx"
ow=CREATEOBJECT("word.application")
ot=ow.Application.Documents.Open(cwj)
nrow=ot.tables(1).rows.count
ncol=ot.Tables(1).Columns.Count
create cursor b1 (zd1 c(20),zd2 n(10))
csq="select " &...