分享自己的一点工作心德，从工商局年检系统开始

时间：2007-06-15 来源： 作者： 【字体：

增大】收藏 | 投稿

*/---------------------------------------------------------------------------------------------------------------------
*/出自:http://im286.com
*/作者:Jsing
*/时间:2005/10/15
*/----------------------------------------------------------------------------------------------------------------------
本贴和大家分享自己的一点工作心德，从工商局年检系统开始。

前几天公司接了一个小单，是本市的一个工商企业年检系统，不是登记，只是年检，因为本身工商局就有一个完善的数据结构体系，只是调用部分数据而已，所以说它小。

问题是这样的，出于对企业信息保密的原则，以及对原始数据安全考虑，我们将需要的数据导出来，重新建立新的数据库。

流程是这样的，从数据库中提取出数据，自动填写到word年检表中相应的地方。然后由工作人员和企业相关人员核对，修改，最后打印存档。这样和原始的工作流程相比会大大提高工商部门的工作效率。

财,管家园,fs119.net

不知道大家有没有看过工商局的年检表，一共有十套Word表格，每份的样式都不一样，而且有些数据根本就是没有的，或者信息不全，从方便修改的角度来讲我们需要将这十套Word表格做成网页的形式，这样问题就来了。一张Word表格可能有几百个要填写的地方，全部做成表单来提交，工作量是相当大的。时间上也不允许我们这样做，于是我就想，可不可以在需要填写的地方加上标签，然后建立模板，从数据库中查找数据来替换呢？如：TempFileContact=Replace(TempFileContact,"<$^2>",RsGroup(0))

这样想也就这样做了，用一张最简单的表格建好模板后，下面就开始写程序读取模板数据了(读出二进制流)，一切都很顺利，但是在保存的时候却出现问题了，当然是Fso.OpenTextFile了，怎么都无法保存成word格式，结果在群里问大家，word文档是用什么格式存储的，结果让我失望，说是微软没有公布。这下可完了，这时候我想到了通用的RTFS，呵呵，先把word转成RTFS作模板不就好了吗？财软,联盟,fs119.net

果然，我得到了让我满意的结果，整个开发过程出就三个小时，当然加模板标签的时候累死我了:mad:，呵呵。

对于RTFS格式，我也不多说了，大家有兴趣可以到微软官方网站查找相关资料。
http://www.microsoft.com
在使用RTFS格式保存的时候大家记得要把头部的ansicpg936替换成deflang1033\deflangfe2052{\f0\fnil}，否则你用模板替换出来的数据不用说肯定是乱码，呵呵。

看到这里肯定有人持不同的意见了,这也是写这篇文章的主要目的，在OA或者一些常见的系统里面有很好的对word在线编辑的功能啊，但是这都需要一些外来组件支持的。这些组件的价格让你吃惊!比如国外的一款：OfficeWriterforword网址是：www.softartisans.com,国内的相同产品的价格相对都是比较贵的，我问过一个在中企的朋友。说是转让一个给我，但是注册信息是他们的，还得5000大洋。对于一个网络公司来讲，像这样一个小单，如果我们再花这么多资金去购买什么组件，几乎就没有什么利润可言了。财软联盟,fs119.net

如果可能用一些变通的方法，同样可以使问题得到解决，我们动一下脑筋，又可以帮公司省钱，何乐而不为呢？而且在公司老总的眼里，你总是一个替公司着想的人，那么你离升职加薪的日子也就不远了，你们说是吗？;)

以上只是我个人的观点，如果各位有不同的意见，或者有更好的方法。欢迎大家和我交流。我也很乐意向你们学习。Email:Web#jwj.cn
2005年10月15日

相关文章