用VFP在INTERNET上制作数据库动态查询

要在互联网上进行数据库动态查询，关键问题是要与互联网上的数据库建立连接。在互联网上与数据库建立连接的方法有很多，如CGI、ASP、JDK等。这里介绍一种利用VFP6.0简单编程语句和HTML标准格式建立FOXPRO数据库连接的方法。

这种方法对于中国早期大量DBASE数据库开发人员引入互联网编程有很大的帮助。它的基本思想是用FOXPRO进程返回一个文件(不是一般的进程或函数返回一个狭义值)HTML文件。通过这种方式，客户端浏览器提供参数。当服务器请求获取数据时，服务器根据客户端提供的参数，在服务器上运行FOXPRO的过程中，向客户端返回一个HTML文档，让客户端浏览器将HTML文档翻译成我们看到的数据网页。

环境:WIN98操作系统，WEB个人服务器系统，ASP服务器系统，VFP6.0，(这些软件的安装方法比较简单，按照软件安装程序的提示操作即可)。
下面用一个详细的例子来说明它的制造过程:
首先在c盘上创建一个目录gd，并创建一个数据表tt.dbf(以前叫数据库)，里面有code和item字段，输入数据。
1。在VFP6.0中用DLL创建一个新的项目文件GD。在VFP6.0中的项目管理器中的PJX，然后在项目管理器中的类标签中创建新的类gd.vcx，该类是从自定义类派生而来的。然后在主菜单的类选项中进入类信息对话框，选择类为OLE public，按确定按钮退出。然后在主菜单类别选项中进入新建方法程序，添加一个名为li visibility的方法程序为public，按close退出，然后按鼠标右键进入gd.vcx(gd)属性对话框，在方法程序中找到li双击鼠标进入其程序编辑窗口，输入以下内容:
lparameters ivar，inifile，iniflag
set default为c:\ GD
use
set text merge on
set text表$ # @ 62；
扫描
$ # @ 60；tr $ # @ 62$#@60;td $ # @ 62$#@60;$#@60;alltrim(代码)$ # @ 62；$#@62;$#@60;/TD $ # @ 60；/TD $ # @ 62；$#@60;$#@60;all trim(item)$ # @ 62；$#@62;$#@60;/TD $ # @ 62；$#@60;/tr $ # @ 62；
ends can
$ # @ 60；表$ # @ 62；
set text merge off
set text merge to
create cursor temp(mm m)
append blank
append memo mm from Li _ Hua _ 01 . htm
VR = temp . mm
use in temp
关闭数据库all
erase Li _ Hua _ 01.htm
return VR
然后关闭保存该方法的程序和gd.vcx(gd)类设计器

二。制作ASP文档
在WEB个人服务器系统中设置目录C:\gd为可运行。并在此目录下创建一个ASP文档(gd.asp)，内容:
$ # @ 60；HTML $ # @ 62
$ # @ 60；HEAD $ # @ 62
数据库查询网页
$ # @ 60；/HEAD $ # @ 62；
$ # @ 60；BODY $ # @ 62
$ # @ 60；% SET GD = server . createobject(" GD . GD ")% $ # @ 62；
$ # @ 60；% = gd.li % $ # @ 62
$ # @ 60；/BODY $ # @ 62；
$ # @ 60；/HTML $ # @ 62；
这样在浏览器中输入hyperlink http:///你的电脑名/gd http://你的电脑名/GD的虚拟目录/gd.asp就可以看到数据库的数据。上面的例子只是介绍了制作的基本思路和方法。只要你知道它的基本思想和方法，利用你丰富的vfp编程技术，你就可以制作出丰富多彩、动态的数据库网页。