我有一个表，字段分别为序号、姓名、学号、数学及语文、合计等，若记录不一定，怎样使用word固定模板，使记录一一对应的填到word表格上且使没有记录的word表格为空呢？word固定模板我已发上去了。

做一个报表，简单。

收到的鲜花

• wuanzhengxin 于 2010-03-25 21:19 送鲜花  5朵  

参照以下代码，用一个循环，将要填写的记录数循环调用模板，填写好数据后另存为其它文件名，保留原模板。

ow=CREATEOBJECT("WORD.APPLICATION")
ow.Documents.Open("d:\myword文档.doc")&&打开已有文档
*ow.VISIBLE=.T.  &&显示打开的文档
ow.Documents(1).Tables(1).Cell(1,2).Range.Text="在第1行第2列键入字符"
ow.Documents(1).Tables(1).Cell(5,5).Range.Text="在第5行第5列键入的字符"
ow.ActiveDocument.SaveAs("d:\My Documents\新myWord文档.doc")     &&另存为
ow.Quit

收到的鲜花

• wuanzhengxin 于 2010-03-25 21:20 送鲜花  5朵  

高手，我试一试。谢谢！！！