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

看实例学VFP：用sql命令创建表2009-03-10 www.bianceng.cn 老马本文是一个在vfp中使用sql命令创建表的实例。用sql命令创建表结构的格式如下：

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

在一文中已经给出了“网站信息表”的表结构如下表：

字段名	类型	宽度
编号	字符型	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 topthis.grid1.recordsource="网站信息表2"

2.表单的unload事件代码：

close alldelete file 网站信息表2.dbfif file（"网站信息表2.BAK"） delete file 网站信息表2.BAKendif

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

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