Internet的WWW网页中有大量的二维表格,这些表格有的从数据库转化而来。笔者在将数据库文件转化为超文本表格时编写了一段程序来自动实现,效率很高,现介绍给读者朋友。
程序的设计思想很简单:打开.DBF数据库,按记录顺序分别读取数据库的各字段,然后加上HTML文件的表格控制符,写到超文本格式的.html文件中。
笔者的程序用Visual FoxPro5.0写成,可在Foxpro各版本下使用。样例数据库为Taxed.dbf,源程序清单和生成的超文本文件TAX.HTM清单附后。;
*Pragram: dbf2htm.prg;
*表结构: Taxed.dbf;
*字段名类型宽度小数位*swdjzh字符型9;
(税务登记证号)*qymc字符型20 (企业名称)*tbrq日期型8;
(填表日期)*sz字符型10 (税种)*ynsk数值型8 2(应纳税种);
set talk off
set safe off;
cr=chr(13)+chr(10);
text=″〈!--A HTML table convented from Taxed.dbf--〉;
″+cr;
text=text+″〈Html〉″+cr;
text=text+″〈Head〉″+cr+″〈Title〉纳税情况统计表;
〈/Title〉″+cr
+″〈/Head〉″+cr;
text=text+″〈Body〉″+cr+″〈Table border=1〉″+cr;
text=text+″〈Caption〉纳税情况统计表〈/Caption〉″+cr;
text=text+″〈Tr〉″+cr;