地震局office自动化软件技术要点分析(2)

原创 2004年08月19日 12:37:00

1:把数据中表做成word的表格

delphi代码如下:

procedure TForm1.bbtn1Click(Sender: TObject);
var
  WordApp,WordDoc,WordTable:OleVariant;
  i,j:integer;
begin
  ADOQuery1.Open;
  WordApp:= CreateOleObject('Word.Application');
  WordApp.Visible:= True;
  WordDoc:=WordApp.Documents.Add;
  WordTable:=WordDoc.Tables.Add(WordApp.Selection.Range,
                                ADOQuery1.RecordCount + 1,
                                ADOQuery1.FieldCount);

  for i:=1 to ADOQuery1.FieldCount do
  begin
    WordTable.Cell(1,i).Range.InsertAfter(ADOQuery1.Fields[i-1].FieldName);
  end;
 
  i:=2;
  with ADOQuery1 do
    while not eof do
    begin
       for j:=1 to ADOQuery1.Fields.Count do
       begin
        WordTable.Cell(i,j).Range.InsertAfter(ADOQuery1.Fields[j-1].Asstring);
       end;
       Next;
       Inc(i);
    end;
end;

 

其中,  ADOQuery1.Open;得sql语句为'Select * from 1_WZ'

运行如下图:

---to be continued by 小榕(Littleroy)

 

VC++之Office自动化开发

去年底老板临时交给一个任务,为一个试验数据管理系统编写一个电子报告生成程序。因为老板也不怎么重视这个项目(钱少啊,呵呵),所以这个任务只好落在我这种小硕身上了。我也是两眼瞎,万事从头干。三个月的苦斗,...
  • Augusdi
  • Augusdi
  • 2013年10月24日 15:01
  • 4618

软件开发技术职位分析及职业规划

分析虽然说每个行业都必须要时刻学习,但软件行业技术的可持续性与积累性较差。例如:中医越做越吃香,而多年前的诺基亚开发已被抛弃。 严重青春饭 社交圈很难往上走 连续不离散的无意义学习 上升通道受限于运气...
  • ThePromonkeyOf_HeLuo
  • ThePromonkeyOf_HeLuo
  • 2017年05月07日 12:05
  • 421

VC++之Office自动化开发

去年底老板临时交给一个任务,为一个试验数据管理系统编写一个电子报告生成程序。因为老板也不怎么重视这个项目(钱少啊,呵呵),所以这个任务只好落在我这种小硕身上了。我也是两眼瞎,万事从头干。三个月的苦斗,...
  • qing666888
  • qing666888
  • 2016年03月07日 14:09
  • 1049

Office 自动化---准备

Office 自动化---准备 引言 笔者在使用C++编写Word和Excel导出报告的时候,由于网上相应的资料很少,所以走了许多弯路。在自己探索尝试了之后,积累一些开发的经验,写成这个系列的博文...
  • Stan1989
  • Stan1989
  • 2013年05月02日 22:56
  • 924

如何嵌入并自动化 Word 文档的 MFC-微软官方文档

概要 使用 OLE 嵌入,其他应用程序文档中嵌入的文档可以修改自动化通过双击嵌入的文档以将其激活"编辑"或"打开"中模式。 本文演示如何嵌入并自动化 Microsoft Office Word 文...
  • zuoyefeng1990
  • zuoyefeng1990
  • 2016年08月23日 14:05
  • 436

Office自动化

摘要   只为方便平时工作,干点有价值含量的事,重复的让计算机去做。office自动化选择,一些资料。 一、技术选型 日常生活工作中,对数据(信息)处理经常用到oiifce套件,除去套件初始功能...
  • u012712186
  • u012712186
  • 2016年11月22日 16:17
  • 822

基于Selenium2和TestNG的自动化测试

【IT168 技术】Selenium是时下很流行的面向web的自动化测试工具,它以执行效率高,覆盖的浏览器广泛等优点得到了很多人的亲睐。TestNG是一款测试框架,它派生自JUnit和NUnit,除了...
  • wanglha
  • wanglha
  • 2014年11月03日 13:37
  • 1624

系统集成项目管理工程师—案例分析重点记忆内容

整体管理: 项目管理计划编制工作流程:  1、明确项目目标和阶段目标 2、成立初步的项目团队 3、工作准备与信息收集 4、依据标准、模版等编写初步的概要的项目计划 5、编写范围管理、质量管理、进度、预...
  • zhoulu7227482
  • zhoulu7227482
  • 2016年11月15日 14:17
  • 1291

需求分析要点

一、人员组织 一般必须有商务活动人员,项目管理人员,设计技术人员等,要求组织人员必须明确负责范围,以及明确工作目标,保证实施的有效性。 二、分析方法   ①思路上的注意事项:     1 重中...
  • jx0260
  • jx0260
  • 2013年03月18日 20:19
  • 731

Office文件的解析

Office文件的解析 引用:http://www.langye.com/a/2013417/237.shtml 【题外话】 这是这个系列的最后一篇文章了,为了不让自己觉得少...
  • ljmwork
  • ljmwork
  • 2013年06月19日 17:21
  • 1851
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:地震局office自动化软件技术要点分析(2)
举报原因:
原因补充:

(最多只允许输入30个字)