作业帮VFP中如何统计表中记录数
来源：学生作业帮 编辑：作业帮 分类：综合作业 时间：2024/05/23 19:13:37
VFP中如何统计表中记录数
我做的一个表单上图,我的目的是在点击添加的时候,客户编码能先判断表中有多少条记录,根据记录的条数加1,自动就显示在客户编码的text1上这样的该怎么做呢,谢谢
我做的一个表单上图,我的目的是在点击添加的时候,客户编码能先判断表中有多少条记录,根据记录的条数加1,自动就显示在客户编码的text1上这样的该怎么做呢,谢谢
用reccound()函数统计记录总数,在此基础上加上然后用text1显示就行了
给“添加”按钮设置click事件代码：
thisform.text1.value=reccount()+1
再问： select 客户编码,reccount(客户编码) as 客户编码 from 基本信息 GROUP BY 客户编码 order by 客户编码 DESC IF reccount()+1 APPEND BLANK IN 基本信息 ENDIF THISFORM.Refresh 这样的代码错了吗？为啥不能用呢，为啥第一句总是显示找不到别名
再答： 看你文件名是否正确，文件是否在当前目录下，你可以指定路径试一下
再问： 都是正确的，真的是报错找不到别名
再答： 你把那个基本信息表再复制一个，改个英文名字再试试 刚没仔细看你的语句，在你的语句中查询结果显示的是两个“客户编号”列呢 再有，你先在命令窗口执行一下那个命令，看看是不是还有提示 还有一个可能的原因是那个APPEND BLANK IN 基本信息，其实你没有必要写 IN 基本信息，你提示找不到别名是这儿出问题了
再问： 我把in去掉就显示语句错误，真心不知道这个怎么添加了，怎么统计客户编码到底有多少条，到底怎么自动加1
再答： 没明白你的意思，你是不是在添加里输入一个编号，然后判断是否存在，如果存在不输入，如果不存在就自动变为原有编号+1？你把IN 基本信息都去掉试试
再问： 不是，就是我每次点击：添加按钮，编号那个text就自动的判断在这之前有多少条信息，它就自动加1显示在text上了，如果前面有6条信息，我点击添加按钮，编号这个text就自动的显示7，是这样的
再答： 在你的表中编号字段允许有重复值吗？如果不允许只是相当于一个记录号的功能就没必要用SQL语句来完成，直接用VFP命令就可以了 use 基本信息 append blank thisform.text1.value=reccount() 注：也可以将此语句改为update 基本信息 set 客户编码=reccount() where 客户编码=（select count(*) from 基本信息） thisform.refresh
再问： 你好，它显示不能识别text1，其实我的编号就是为了区分相同字段用的，是不能重复的，就像自然数那样，但是还是不行，而且还显示客户编码不唯一，但是我里面都没有信息的，这个是什么原因呢
给“添加”按钮设置click事件代码：
thisform.text1.value=reccount()+1
再问： select 客户编码,reccount(客户编码) as 客户编码 from 基本信息 GROUP BY 客户编码 order by 客户编码 DESC IF reccount()+1 APPEND BLANK IN 基本信息 ENDIF THISFORM.Refresh 这样的代码错了吗？为啥不能用呢，为啥第一句总是显示找不到别名
再答： 看你文件名是否正确，文件是否在当前目录下，你可以指定路径试一下
再问： 都是正确的，真的是报错找不到别名
再答： 你把那个基本信息表再复制一个，改个英文名字再试试 刚没仔细看你的语句，在你的语句中查询结果显示的是两个“客户编号”列呢 再有，你先在命令窗口执行一下那个命令，看看是不是还有提示 还有一个可能的原因是那个APPEND BLANK IN 基本信息，其实你没有必要写 IN 基本信息，你提示找不到别名是这儿出问题了
再问： 我把in去掉就显示语句错误，真心不知道这个怎么添加了，怎么统计客户编码到底有多少条，到底怎么自动加1
再答： 没明白你的意思，你是不是在添加里输入一个编号，然后判断是否存在，如果存在不输入，如果不存在就自动变为原有编号+1？你把IN 基本信息都去掉试试
再问： 不是，就是我每次点击：添加按钮，编号那个text就自动的判断在这之前有多少条信息，它就自动加1显示在text上了，如果前面有6条信息，我点击添加按钮，编号这个text就自动的显示7，是这样的
再答： 在你的表中编号字段允许有重复值吗？如果不允许只是相当于一个记录号的功能就没必要用SQL语句来完成，直接用VFP命令就可以了 use 基本信息 append blank thisform.text1.value=reccount() 注：也可以将此语句改为update 基本信息 set 客户编码=reccount() where 客户编码=（select count(*) from 基本信息） thisform.refresh
再问： 你好，它显示不能识别text1，其实我的编号就是为了区分相同字段用的，是不能重复的，就像自然数那样，但是还是不行，而且还显示客户编码不唯一，但是我里面都没有信息的，这个是什么原因呢