如下的记录如何在程序中用代码找出并删除字段名=‘字段名’如字段名xh,它的值是xh - VFP论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → 数据库技术 → 『 VFP论坛』 → 如下的记录如何在程序中用代码找出并删除字段名=‘字段名’如字段名xh,它的值是xh

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 873 人关注过本帖

标题：如下的记录如何在程序中用代码找出并删除字段名=‘字段名’如字段名xh,它的 ...

取消只看楼主加入收藏

sylknb

等　级：贵宾
威　望：14
帖　子：1547
专家分：184
注　册：2006-6-3
结帖率：79.38%

楼主

已结贴√ 问题点数：20 回复次数：7

如下的记录如何在程序中用代码找出并删除字段名=‘字段名’如字段名xh,它的值是xh

图片附件: 游客没有浏览图片的权限，请登录或注册

我要删除xh=xh的一些记录，delete for xh='xh',这是呆板的方法，
如何在程序中找出并删除字段名=字段名(的值)？
又牵涉到字段的名与字段的值

搜索更多相关主题的帖子: 如何　记录　

2015-06-06 12:13

sylknb

等　级：贵宾
威　望：14
帖　子：1547
专家分：184
注　册：2006-6-3

第 2 楼

得分:0

以下是引用sdta在2015-6-6 12:34:58的发言：

SELECT 0
USE 表
FOR I=1 TO FCOUNT()
BLANK ALL FIELDS (FIELD(I)) FOR EVALUATE("表."+FIELD(I))==ALLTRIM(FIELD(I))
ENDFOR

如果是清空记录用上面的代码，否则自行修改上面的代码

我改了一下：第一个字段：dele all for EVALUATE(FIELD(1))==ALLTRIM(FIELD(1)) 运行结果没有一个作删除标记。

2015-06-06 15:44

sylknb

等　级：贵宾
威　望：14
帖　子：1547
专家分：184
注　册：2006-6-3

第 3 楼

得分:0

以下是引用muyubo在2015-6-6 16:21:34的发言：

dele all for ALLTRIM(EVALUATE(FIELD(1)))==ALLTRIM(FIELD(1)) &&试试

试了还不行，结果是0条记录被删除

2015-06-06 16:25

sylknb

等　级：贵宾
威　望：14
帖　子：1547
专家分：184
注　册：2006-6-3

第 4 楼

得分:0

以下是引用muyubo在2015-6-6 16:36:48的发言：

dele all for ALLTRIM(FIELD(1))==ALLTRIM(EVALUATE(FIELD(1))) &&再试,应该行.
ALLTRIM(FIELD(1)) --是字段名
ALLTRIM(EVALUATE(FIELD(1)))--是字段的记录

不行还是0条记录被删除。
我呆试如下：
delete for ALLTRIM(EVALUATE(FIELD(1)))="xh"
它倒行了，问题的==后面指了特定字段值

2015-06-06 16:46

sylknb

等　级：贵宾
威　望：14
帖　子：1547
专家分：184
注　册：2006-6-3

第 5 楼

得分:0

以下是引用muyubo在2015-6-6 17:04:44的发言：

m_zd=FIELD(1)
dele all for &m_zd==ALLTRIM(EVALUATE(FIELD(1))) &&这样就行了

还是不行呀! 真是弄不懂了。

2015-06-06 17:09

sylknb

等　级：贵宾
威　望：14
帖　子：1547
专家分：184
注　册：2006-6-3

第 6 楼

得分:0

muyubo

附上数据表，我是把20多个Excel表批量转换成DBF，并同时合成一个DBF表之后产生了不少的字段名为值的记录。

todata.rar (37.68 KB)

请你帮一下如何删除。当然用呆办法是delete for xh='xh',就一下子成功，问题是通用性不够？

[ 本帖最后由 sylknb 于 2015-6-6 17:48 编辑 ]

2015-06-06 17:45

sylknb

等　级：贵宾
威　望：14
帖　子：1547
专家分：184
注　册：2006-6-3

第 7 楼

得分:0

成功了，我用如下命令试一下 dele for xh='xh'是成的，改为dele for xh='XH'就不成。原来是大小写问题，怪了。
有几概念弄不清，请各行高手指教。
例如第一个字段为xh
browe fiel xh for xh='51111'&&这是常见的命令,xh是字段名
   EVALUATE(FIELD(1))    &&是对字段1计算 xh ,不是"xh"
   fiel(1)               &&它返回值是字段名 -->"xh"
(fiel(1)               && 它返回的是值 xh ，不是"xh"

a=fiel(1)
&a.                     替换出xh ，不是"xh"
如何来理介有关行家的介绍(函数后面的)。似懂非懂。

2015-06-06 19:24

sylknb

等　级：贵宾
威　望：14
帖　子：1547
专家分：184
注　册：2006-6-3

第 8 楼

得分:0

没有高手指教呀，可悲

2015-06-08 19:47

快速回复：如下的记录如何在程序中用代码找出并删除字段名=‘字段名’如字段名xh ...