当前位置: 首页 > 编程语言 > vfp > 正文

看实例学VFP:用sql命令创建表

时间:2009-03-10 www.bianceng.cn 老马

本文是一个在vfp中使用sql命令创建表的实例。用sql命令创建表结构的格式如下:

create table 表名 (字段名1 类型(宽度[,小数位]),字段名2 类型(宽度[,小数位]),…)

看实例学VFP:示例数据库一文中已经给出了“网站信息表”的表结构如下表:

字段名 类型 宽度
编号 字符型 5
网站名称 字符型 12
网站网址 字符型 24

那么我要创建相同的表结构并且表名为“网站信息表2“的sql命令如下:

create table 网站信息表2 (编号 c(5),网站名称 c(12),网站网址 c(24))

本例主要操作是在表单的init事件中完成的,在该事件中首先使用sql命令创建出“网站信息表2”的表结构,然后把“网站信息表”的所有记录追加到“网站信息表2”中,并把“网站信息表2”设为表格控件grid1的数据源,这样表格显示的就是“网站信息表2”的数据,此时你打开工作目录就可以看到这个“网站信息表2”;最后在退出时在表单的unload事件中将我们创建的“网站信息表2”删除。界面如下:

制作步骤如下:

一、新建表单,并将其caption属性值设置为“编程入门网-用sql命令创建表”,width和height属性值分别设置为375和250,AutoCenter属性值设置为.t.,将表单保存为“用sql命令创建表.scx”。

二、向表单上添加一个表格控件grid1,并将其RecordSourceType属性值设为“1-别名”,ReadOnly属性值设为.t.。

三、添加事件代码:

1.表单的init事件代码:

create table 网站信息表2 (编号 c(5),网站名称 c(12),网站网址 c(24))
append from 网站信息表
go top
this.grid1.recordsource="网站信息表2"

2.表单的unload事件代码:

close all
delete file 网站信息表2.dbf
if file("网站信息表2.BAK")
   delete file 网站信息表2.BAK
endif

四、运行“用sql命令创建表.scx”。

本例代码在Win2003+VFP6.0环境下调试通过。

查看全套“菜鸟也学VFP”教程