- 博客(26)
- 收藏
- 关注
RSS订阅原创 判断一个库的记录是不是都已经打上删除标记了
SELECT users set delete off count to a1 for !deleted() if a1 >0 and reccount() >0 *有记录没有打上删除标记 endif
2007-03-06 12:06:00
519
原创 判断一个数据表是否为空
用RECCOUNT()就行，另外还可以SELECT COUNT(*) AS 记录数 INTO CURSOR T1 FROM 表名IF T1.记录数=0 ?为空ENDIF或USE 表名GO BUTTIF BOF() ?为空ENDIF
2007-03-06 11:59:00
1450
原创 对于update命令只有vfp9支持
VFP9支持update table_name set table_A.a=table_B.B FROM table_B WHERE...的语句格式 对于其他版本的VFP可以使用replace来更改字段内容
2007-03-06 11:55:00
938
原创 为Grid的列表头指定排序动作
一个grid由几个column组成，每个column都有header，header支持click事件，可以通过下面代码来给列表头排序，IF this.Caption = Name↓ then SET ORDER TO name ascending this.Caption = Name↑ ELSE SET ORDER TO name descending
2006-11-21 22:11:00
688
原创 使用set order to来指定当前索引
使用set order to 索引名称或者索引序号来指定当前主控索引,比如有一个库有两个索引name和age，可以使用set order to name来按姓名排序也可以使用set order to age来按年龄排序。在指定索引的时候也可以使用ascending或者descending来指定递增或者递减排序比如：set order to name ascending或者set or
2006-11-21 21:42:00
1754
原创 使用seek在数据库中查找记录
seek函数可以根据索引来查找指定的记录在数据库中第一次出现的位置，并返回一个逻辑值， 搜索到返回.T.，指针移到所指定记录的位置；否则返回.F.，指针移到最后一条记录。例如搜索teachers数据库中的姓名字段里有没有leozhang，可以这样来写，seek(leozhang, teachers,name)
2006-11-21 21:10:00
1530
原创 Need to confirm
我用VFP做了个程序，但非要有VFP的地方才能运行，请问各位高手，要如何才能把它做成一个可以直接运行的程序呢？？？？还有就是VFP的主程序是什么东东？要怎么去写啊？---------------------------------------------------------------新建一个项目，把你的表单、报表、程序之类反正你编的东西都加进去，如果你运行的是一个程序的话，直接把它设为主程序
2006-11-11 23:21:00
781
原创 使用Sys(0)得到当前工作的主机名和用户名
使用sys(0)可以得到当前工作的主机名和用户名，比如：?sys(0)返回Pc2 # LeoZhang
2006-11-11 15:12:00
586
原创 创建、修改、打开、关闭、显示、删除数据库
create database databasename &&创建数据库modify database databasename &&修改数据库open database database [exclusive | shared] [Noupdate] [validate] &&打开数据库EXCLUSIVE：以独占方式打开数据库。如果以独占方式打开数据库，则其他用户无法访问
2006-11-07 15:28:00
908
原创 VFP工作区的概念(感谢十豆三)
1. VFP有关工作区的规定工作区：VFP有32767个工作区。在每个工作区打开的表均有各自独立的指针。工作区序号：1～32767，访问其他工作区的数据时，必需使用别名。工作区有三种别名:(1)对应1到10区，别名分别为A到J；(2)USE命令打开表时所定义的别名；(3)打开表文没有定义别名，则表文件名本身就是别名。系统启动时，第一工作区为当前工作区。2. 工作区的
2006-11-05 10:00:00
4360
原创 使用ole中的Microsoft Date and time picker control来添加日期选择框
代码方式：在一个form的按钮的click事件中添加下面的代码，----------------------start---------------------frmCalendar = CREATEOBJECT(Form)frmCalendar.addobject("oleCalendar","olecontrol","MSComCtl2.DTPicker.2")frmCalendar.ol
2006-10-31 16:00:00
1663
原创 使用_oleCalendar类添加日历到窗口中
_oleCalendar类位于Home()+FFC目录下的_datetime.vcx类库里，拖入到窗口中，右击，点“生成器”，在窗口中的“Field name to bind calendar”处填写要将Calendar绑定的数据库字段名，这样使用时选择好时间，会自动地更新该字段。例：数据库名称为table1，里面有一个logdate来与calendar绑定，如果该字段为空，Calenda
2006-10-30 19:51:00
754
原创 使用PADR，PADL，PADC来填充字符串
由一个表达式返回一个字符串，并从左边，右边或同时从两边用空格或字符把该字符串填充到指定长度。PADL(eExpression, nResultSize [, cPadCharacter])或者PADR(eExpression, nResultSize [, cPadCharacter])或者PADC(eExpression, nResultSize [, cPadCharact
2006-10-29 11:50:00
1396
原创 使用Cursorgetprop函数获得临时表的数据表名称
cstr = cursorgetprop("sourcename", alias()) //列出当前表文件的文件路径?cstr //会显示c:/foxpro/leo1/table1.dbf,进一步我们可以使用justpath等操作。
2006-10-29 10:42:00
499
原创 使用Cursorgetprop函数获得临时表的数据源类型
nsourcetype = cursorgetprop("sourcetype",alias()) //这个语句可以显示出当前打开表的类型do case //用这个表达式来对不同的数据类型进行不同的操作 case nsourcetype = 1 //本地sql视图 [expressions] case nsourcetype = 2
2006-10-29 10:26:00
663
原创 使用Alias命令来返回当前表或指定工作区表的别名
使用方法：ALIAS([nWorkArea | cTableAlias])nWorkArea ：指定工作区编号，ALIAS( ) 函数返回此工作区表的别名。cTableAlias ：指定表别名，ALIAS( ) 函数返回此表的别名。 如果省略参数 nWorkArea 或 cTableAlias，ALIAS( ) 函数将返回在当前工作区中打开的表的别名。如果当前或指定工作区没有打开的表，则函数返
2006-10-20 16:27:00
802
原创 使用Text...Endtext输出文本行、表达式和函数的结果及内存变量的内容
这个结构化的编程命令把 TEXT 和 ENDTEXT 语句之间的文本行送到 Visual FoxPro 的主窗口、用户自定义窗口、打印机、文本文件或低级文件中。TEXT 命令把文本行送入当前输出设备，直至遇到 ENDTEXT 语句或程序结束。默认情况下，TEXT ... ENDTEXT 的输出送到 Visual FoxPro 的主窗口或活动窗口。使用 SET CONSOLE OFF 命令可禁止输出
2006-10-20 16:05:00
2037
原创 使用Return来结束程序运行并返回值
RETURN 终止程序、过程或函数的运行，并将控件返回给调用程序、最高层次调用程序、另一个程序或命令窗口。当执行 return 命令时， Visual FoxPro 释放 PRIVATE 类型的内存变量。通常，RETURN 放在程序、过程或函数的未尾，用来将控件返回给高层的程序。但是，如果省略 return 命令，也执行一个隐含的 return 命令。 使用方法：RETURN [eExpres
2006-10-20 15:37:00
1463
原创 使用Local创建内存变量
Local - 创建 内存变量或内存变量数组。使用说明：local 变量1,变量2,变量3 或者 local 数组1,数组2,数组3局部内存变量和内存变量数组只能在创建它们的过程或函数中使用和更改，不能被高层或低层程序访问。一旦包含局部内存变量和数组的过程或函数执行完毕，则释放这些局部内存变量和数组。用 LOCAL 创建的内存变量和数组都初始化为“假”(.F.)。必须在赋值之前把内存变量或
2006-10-16 23:01:00
863
原创 使用addbs、justpath和sys(16)返回当前程序的目录
addbs - 向一个路径表达式添加一个反斜杠使用方法：ADDBS(路径)范例：?addbs("c:/foxpro") &&输出为c:/foxpro/justpath - 返回完整路径中的路径名。使用方法：JUSTPATH(完整路径名)范例：?justpath("c:/foxpro/a.dbc") &&输出为c:/foxprosys(16) - 返回正在执行的程序文
2006-10-16 22:50:00
1731
原创 数据库事件功能
数据库同样提供像控件一样的事件功能,默认是关闭的,可以通过以下方法打开:打开数据库设计器->右键属性->选中"set events on"复选框即可.也可以通过命令方式打开:dbsetprop(数据库名称,"database",.T.) 通过命令方式取消:dbsetprop(数据库名称,"database",.F.)
2006-10-16 21:24:00
993
原创 使用adatabase将打开的数据库名称存入数组中
使用方法：ADATABASES(ArrayName)需要指定要存贮的数组的名称，如果该数组没有定义过，系统会自动定义这个数组，如果数组的大小不足，系统也会自动地扩充数组的大小来存储所有信息，如果返回0代表当前没有打开的数据库，也不会创建数组。数组是二维数组，会存储数据库的名称与数据库的路径。范例：OPEN DATABASE leo1OPEN DATABASE leo2ADATABASES(
2006-10-15 17:33:00
457
原创 使用set database to来更改当前使用数据库
Set database to使用方法：SET DATABASE TO [DatabaseName]当同时打开多个数据库的时候，使用这个命令可以设置当前使用的database或者取消当前的database。范例：CREATE DATABASE mydbc1 CREATE DATABASE mydbc2SET DATABASE TO mydbc1 &&将当前数据库设为my
2006-10-15 16:57:00
1202
原创 使用ASCAN来查找数组数据
ASCAN参数表达式：ASCAN(ArrayName, eExpression [, nStartElement [, nElementsSearched [, nSearchColumn [, nFlags ]]]]) 返回查找到的表达式的索引，如果反回0则代表数组中没有相应的信息，nStartElement代表从数据的第几个元素开始查起，nElementsSearched代表在数组中查
2006-10-15 15:04:00
948
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人