【VFP] MS Virual FoxPro 9.0 | 常用命令 | VFP

1、复制表结构（自由表）

USE C:\Users\HUAWEI\新建文件夹\benqi

COPY STRUCTURE to C:\Users\HUAWEI\新建文件夹\test3\benqi

说明1： benqi,即benqi.dbf

说明2： 自由表不能被占用

2、获取自由表字段名

USE d:\t_lie

for i = 1 to fcount()
    WAIT WINDow '字段名: ' + field(i)  TIMEOUT 3
ENDFOR

说明1： t_lie不能被占用

3、弹框提示

WAIT WIND 'ok...'  TIMEOUT 3

说明1： 3秒后自动关闭

说明2： 如果不带“timeout 3”，需点击才会关闭

4、物理删除表数据

DELE FROM D:\t_result WHERE msg like "-%"

CLOSE TABLES 

PACK D:\t_result

说明1： dele from只是逻辑删除，给删除的记录打标签

说明2： pack是物理删除

说明3： pack前表不能打开，需关闭表，即close tables

 5、自定义函数

FUNCTION mkdir(_name) md _name return

说明1： 函数具有返回值

说明2： 调用直接传参即可

 6、自定义过程

procedure mkdir(_name) ;
md _name
end

说明1：过程没有返回值

 7、判断文件是否存在

IIF(file("d:\001"), MESSAGEBOX("存在"), MESSAGEBOX("不存在"))

8、判断目录是否存在

IIF(directory("d:\001"), MESSAGEBOX("存在"), MESSAGEBOX("不存在"))

 9、函数

1）是否为NULL

ISNULL()

2）是否为空串

EMPTY()

10、DBF数据表操作

示例表）

CREATE dbf D:\vfp\t_lie(z101 C(20), t C(20))

1）修改表字段名称

alter table D:\vfp\t_lie rename t to t1

2）修改表字段类型

ALTER table D:\vfp\t_lie alter COLUMN t1 B(10)