摘要:在实际应用VFP编写的各类应用系统过程中,用户建立的大量信息,一般都是存贮在应用系统中的数据库中。随着网络技术的迅速发展,许多数据信息要求在网上共享使用,如应用系统中数据库已存在的信息,输出为HTML格式的文件在网上进行浏览,可以解决数据共享的问题,本文介绍了利用转换类库和FrontPage2000与VFP编程两种可以把数据库内容转换为HTML格式文件的方法。
在实际应用VFP编写各类应用系统过程中,用户可能建立了大量的数据信息,这些信息一般都是存贮在各类数据表中,随着网络技术的迅速发展,许多数据信息要求在网上共享使用,如果相关的信息已经存在数据表中,可以不需要重新输入信息,直接生成可以在网上浏览使用的HTML格式文件,下面笔者介绍两种数据库内容到HTML格式输出的方法。
一、是利用VFP提供的数据表内容转换到HTML格式文件类库实现。在VFP系统目的FFC子目录下存在一个_internet.vcx类库,其中_dbf2html为数据表到HTML格式转换类,在使用时,可在表单控件窗口中使用添加类的方法将该类库添加到控件中,并在表单中添加_dbf2html类,该类有关的属性、事件和方法说明如下:
cSource属性 指出生成HTML的数据表源文件名,缺省值为“”。
NgenOutput属性 _GENHTML输出选项
0 — 生成输出文件
1 — 生成输出文件并在Visual FoxPro编辑器中显示它
2 — 生成输出文件并在Internet Explorer编辑器中显示它
3 — 在显示Save As 对话框之后生成并显示输出文件
4 — 建立PUBLIC_oHTML对象并生成一个文件
5 — 建立PUBLIC_oHTML对象并不生成一个文件
缺省值为2
cOutFile属性 指出输出的HTML文件的名称,缺省值为“”
IautoNameOutput属性 指出_GENHTML是否自动基于源来命令该输出文件,缺省值
为.T.。
IuseCurrentAlias属性 指出是否使用当前别名作为源,缺省值为.T.。
Cscope属性 指出输出的范围(例好NEXT或ALL),缺省值为“”。
CStyle属性 指出Genhtml.dbf的ID字段列出的可视风格,缺省值为“”。
GenHTML方法 通过使用Csource、cOutpur和nGenOutput中指定的属性调用
Genhtml.prg来生成HTML代码
语法:GenHTML()
返回值:无
参数:无
如果在磁盘中存在一个干部基本情况数据表,我们可以使用以上介绍的类库自动将人员通信录中的数据信息制作网页格式。
新建一个表单,在表单中利用表单控件类中添加_internet.vcx类库,点击_dbf2html类添加到表单中,将该类的NAME属性设为ZH,其它属性均为默认值,然后在表单中添加一个命令按钮COMMAND1,在该命令按钮的CLICK事件中加入如下代码:
FILE1=GETFILE("DBF") &&选择一个数据表文件
FILE2=SUBS(FILE1,1,AT(".",FILE1)-1) &&去掉文件名后缀
FILE2=SUBS(FILE2,RAT("",FILE2)+1) &&去掉文件名的路径
IF USED("&FILE2")
SELE &FILE2
ELSE
SELE 0
USE &FILE2
ENDIF
&&以上命令是确认一个数据文件已经打开
THISFORM.ZH.GENHTML() &&执行转换程序
保存并运行这个表单,使用鼠标点击窗口中的命令按钮,将弹出一个选择文件对话框,在这里可任意选择一个数据表文件,我们选择的是人员通信录数据表,确定后会发现,系统将会自动生成一个以所选择的数据表文件同名的以HTM为扩展名的网页文件并启动浏览器浏览这个生成的HTM文件,实现了数据库内容的HTML文件的输出。