现有一个word文档，内有结构相同的多个表格，如何导入到dbf表中？望各位高手赐教。万分感谢！！！

[此贴子已经被作者于2020-3-29 21:38编辑过]

[此贴子已经被作者于2020-3-29 21:34编辑过]

之前那个贴是读一个表，改一下读多几个表就是了

CREATE CURSOR tt (考生号 C(16), 姓名 C(10), 总分 I, 语文 I, 数学 I, 外语 I, 综合 I)
word = CREATEOBJECT("Word.Application")
doc = word.Documents.Open("C:\TEMP\多表格文档(2)\多表格文档(2).docx")
FOR EACH tab IN doc.tables
    FOR row=2 TO tab.rows.count
        INSERT INTO tt VALUES (;
           RTRIM(tab.Cell(row,1).Range.Text, 0h0D,0h07,0h20),;
           RTRIM(tab.Cell(row,2).Range.Text, 0h0D,0h07,0h20),;
           VAL(tab.Cell(row,3).Range.Text),;
           VAL(tab.Cell(row,4).Range.Text),;
           VAL(tab.Cell(row,5).Range.Text),;
           VAL(tab.Cell(row,6).Range.Text),;
           VAL(tab.Cell(row,7).Range.Text))
     ENDFOR
ENDFOR
doc.Close
word.Quit
SELECT * FROM tt