計算機二級VF：把FoxPro數(shù)據(jù)庫轉(zhuǎn)變成HTML表格

　　Internet的WWW網(wǎng)頁中有大量的二維表格，這些表格有的從數(shù)據(jù)庫轉(zhuǎn)化而來。筆者在將數(shù)據(jù)庫文件轉(zhuǎn)化為超文本表格時編寫了一段程序來自動實現(xiàn)，效率很高，現(xiàn)介紹給讀者朋友。程序的設(shè)計思想很簡單：打開.DBF數(shù)據(jù)庫，按記錄順序分別讀取數(shù)據(jù)庫的各字段，然后加上HTML文件的表格控制符，寫到超文本格式的.html文件中。筆者的程序用Visual FoxPro5.0寫成，可在Foxpro各版本下使用。樣例數(shù)據(jù)庫為Taxed.dbf,源程序清單和生成的超文本文件TAX.HTM清單附后。

　　*Pragram: dbf2htm.prg

　　*表結(jié)構(gòu): Taxed.dbf

　　*字段名類型寬度小數(shù)位*swdjzh字符型9

　　(稅務(wù)登記證號)*qymc字符型20 (企業(yè)名稱)*tbrq日期型8

　　(填表日期)*sz字符型10 (稅種)*ynsk數(shù)值型8 2(應(yīng)納稅種)

　　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〉納稅情況統(tǒng)計表〈/Title〉″+cr;

　　+″〈/Head〉″+cr

　　text=text+″〈Body〉″+cr+″〈Table border=1〉″+cr

　　text=text+″〈Caption〉納稅情況統(tǒng)計表〈/Caption〉″+cr

　　text=text+″〈Tr〉″+cr;