搜索
编程论坛
→
数据库技术
→
『 VFP论坛 』
→ 如下的记录如何在程序中用代码找出并删除字段名=‘字段名’如字段名xh,它的值是xh
标题:
如下的记录如何在程序中用代码找出并删除字段名=‘字段名’如字段名xh,它的 ...
取消只看楼主
sylknb
等 级:
贵宾
威 望:
14
帖 子:1519
专家分:174
注 册:2006-6-3
结帖率:
79.3%
楼主
已结贴
√
问题点数:20 回复次数:7
如下的记录如何在程序中用代码找出并删除字段名=‘字段名’如字段名xh,它的值是xh
我要删除xh=xh的一些记录,delete for xh='xh',这是呆板的方法,
如何在程序中找出并删除字段名=字段名(的值)?
又牵涉到字段的名与字段的值
搜索更多相关主题的帖子:
如何
记录
2015-06-06 12:13
sylknb
等 级:
贵宾
威 望:
14
帖 子:1519
专家分:174
注 册: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
帖 子:1519
专家分:174
注 册: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
帖 子:1519
专家分:174
注 册: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
帖 子:1519
专家分:174
注 册: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
帖 子:1519
专家分:174
注 册: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
帖 子:1519
专家分:174
注 册: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
帖 子:1519
专家分:174
注 册:2006-6-3
第
8
楼
得分:0
没有高手指教呀,可悲
2015-06-08 19:47
8
1/1页
1
参与讨论请移步原网站贴子:
https://bbs.bccn.net/thread-446251-1-1.html
关于我们
|
广告合作
|
编程中国
|
清除Cookies
|
TOP
|
手机版
编程中国
版权所有,并保留所有权利。
Powered by
Discuz
, Processed in 0.649137 second(s), 9 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved