公文自动生成管理系统的设计与实现

公文自动生成管理系统的设计与实现摘要：随着电子政务的快速发展，对公文进行电子化管理成为必须解决的问题。本文首先对系统进行了分析，给出了系统结构和开发手段，然后对关键技术进行了阐述，包括公文的自动生成、数据库的存取操作和基于内容的查询；最后给出了系统运行实例，证明了系统的可行性。关键词：电子政务系统结构公文管理1.引言公文是政府、行政机关等各类部门请示汇报、命令下达等工作中的重要部分。目前，传统的公文管理以纸质原件为主，一般存放在档案室。但当公文数目逐渐增多时，公文的查找等管理就存在效率较低等缺点[1]。本文利用Delphi技术和数据库管理技术，设计了一个公文自动管理系统，在不改变用户公文撰写流程的前提下，完成了电子公文的自动生成、归档和查询等主要功能，大大提高了管理和办公的效率。2.系统设计系统采用C/S（Client/Server）两层结构。C/S模式能够充分发挥客户端PC的处理能力，客户端响应速度快。采用C/S模式开发的系统扩展性和适应性好，可以方便地实现系统功能的拓展和工作内容的变更[2]。系统开发工具采用Delphi7.0，数据库服务器操作系统为Windows2003Server，数据库管理软件为SQL2005，实现对公文的数据管理。数据库服务器主要完成公文信息的存储和访问，同时数据库的维护也在服务器端直接完成。客户端主要是对服务器的数据信息进行显示，形成友好的用户交互界面,通过图形界面提供给用户对服务器数据进行编辑、查询等操作[3]。根据水利工作管理的需要，系统功能包括公文的自动生成、公文存档、公文查询、系统设置四个主要模块（图1）。3.关键技术系统中关键部分的实现主要包括以下内容：（1）公文的自动生成；（2）公文在数据库中的存取操作；（3）基于内容的公文检索功能。3.1公文自动生成功能公文的自动生成主要是利用各种现有的模板模板自动生成符合要求的各种文档。目前现有的各种模板主要是水政执法管理的各种文件，比如征收水土保持补偿费的通知、水行政处罚告知书等。该功能的实现主要是利用Delphi中OLE技术来控制WORD软件[4]，包括WORD软件的启动、模板的调用、格式的控制和内容的插入，实现的步骤为：（1）在WORD软件中生成相关公文的模板文件并存储。比如河道采砂管理费通知书可命名保存为hedaocs.dot。（2）在WORD中对模版文件中需要插入内容的地方设置书签。比如hedaocs.dot中有个地方需要插入发文的字号，可在插入的位置设置书签名称为heddaocswh。（3）打开模板文件，在书签处插入填写的内容。主要代码如下：//--------------初始化--------------------varwordapp:Variant;trywordapp:=GetActiveOleObject('word.Application');exceptwordapp:=CreateOleObject('word.Application');end;//-------------------对模板中书签处插入内容-----------------forI:=1towordApp.ActiveDocument.Bookmarks.CountdobeginItemIndex:=I;vBookMark:=wordApp.ActiveDocument.Bookmarks.Item(ItemIndex);ifLowerCase(vBookMark.Name)='hedaocsnd'thenbeginvBookMark.Select();wordApp.Selection.InsertAfter(trim(edit1.text));//edit1中的内容为发文的字号end;------------------//依次使用以上方法对其它书签位置进行插入操作end;3.2公文在数据库中的存取系统将公文的主要关键字部分以记录形式保存在数据库中同时，对公文正文部分以二进制数据流的方式存入数据库。这样即有利于公文的浏览和恢复，又有利于公文的查询。公文的正文内容在SQL数据库中对应的字段为BLOB类型。在delphi中对数据流的操作基类是TStream类，TStream还有其他的派生类,其中最常用的是TFileStream(文件流)、TMemoryStream(内存流)、TblobStream(字段流)。这里使用TMemoryStream和TBlobStream。将公文正文内容存入数据库的主要实现部分如下：varMS:TMemoryStream;str:string;beginMS:=TMemoryStream.Create;//生成TMemoryStream对象edit1.text.savetostream(MS);//把edit1.text的内容（正文内容）保存到数据流中str.savetostream(MS)ADOQuery2.SQL.Add('insertinto公文values(:str)');ADOQuery2.parameters.parambyname('str').value.loadfromstream(MS);------------------end;3.3基于内容的公文查询通过公文的关键字对公文进行检索，相对来说实现较为简单。有时，当用户只记得公文的大致内容，比如正文中的一些关键词。对于其它一些基本关键字信息已经忘记了，比如标题，发文时间等，这是就需要进行基于内容的查询操作[5]。首先读取数据库中公文的记录信息，然后使用Delphi中的TWordDocument类打开恢复的公文，调用TWordDocument类中Content的find.execute()方法，就可以在文档范围内进行内容查找。在查找的时候还可以通过参数控制实现在查找过程中是否区别大小写、是否使用通配符等。匹配成功以后，结果返回True，系统为该条记录做好标记，将查询结果进行显示。当数据库中所有的记录都处理完后，所有被标记的记录均为满足条件的结果，即内容中包含指定关键词的公文。4.结束语本文使用Delphi和SQL数据库技术设计，结合MSword的相关功能，设计和实现了一个公文自动管理系统，给出了系统的具体结构和实现过程，对关键技术进行了描述。系统的正常运行，证明了该方案是切实可行的。参考文献：[1]单玉刚,张荣茂.面向电子政务的公文管理系统开发与应用[J].小型微型计算机系统2003(3).[2]高岭,林凯,李增智.面向C/S和对象Web的管理信息系统开发研究[J].小型微型计算机系统,2001,21(2):222-