Chinaunix首页 | 论坛 | 博客
  • 博客访问: 1257781
  • 博文数量: 788
  • 博客积分: 4000
  • 博客等级: 上校
  • 技术积分: 7005
  • 用 户 组: 普通用户
  • 注册时间: 2008-08-19 15:52
文章存档

2017年(81)

2011年(1)

2009年(369)

2008年(337)

分类:

2009-02-19 17:03:24



我做了一个word文档的模版,里面有一个表格,如何才能把word打开,并把数据库的内容插到word表格里面去啊,怎么样才能插进去啊?高手指教!!!!!给20分

uses  
      Word2000;  
   
  var  
    _Cell:   Cell;  
    Idx:   Integer;  
    Row:   Integer;  
    Col:   Integer;  
   
  begin  
    ...........  
    ADOQuery.Open;  
    for   Row   :=   1   to     ADOQuery.RecordCount   do  
    begin  
        for   Col   :=   1   to     ADOQuery.FieldCount   do  
        begin  
            _Cell   :=   WordDocument.Tables.Item(Idx).Cell(Row,   col);  
            _Cell.Range.Text   :=   ADOQuery.Fields[Col   -1].Value;  
        end;  
        ADOQuery.Next;  
    end;  
  .............



--------------------------
新闻:专注、极致、快、口碑 互联网创业的葵花宝典
导航:博客园首页  知识库  新闻  招聘  社区  小组  博问  网摘  找找看
阅读(248) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~