| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1871 人关注过本帖
标题:帮个忙吧各位大侠
只看楼主 加入收藏
kaximoduo555
Rank: 1
等 级:新手上路
帖 子:21
专家分:0
注 册:2014-6-6
结帖率:44.44%
收藏
已结贴  问题点数:20 回复次数:8 
帮个忙吧各位大侠
alter table bys rename   &a  to &w  错在哪?
还有我有一个表单中有40个TEXT文本框,用来显示一个表中的所有字段名称!
use bys  
k=1
go 1
do whil k<=fcount()  
   I="TEXT"+TRANSFORM(k)
   thisform.&i..value=fiel(k)
   k=k+1
endd

现在我想在TEXT中直接修改其相对应的字段名!命令怎么写!谢谢!

[此贴子已经被作者于2016-1-25 17:30编辑过]

2016-01-25 17:17
hepingfly
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:15
帖 子:195
专家分:657
注 册:2015-5-21
收藏
得分:5 
vfp9.0 测试 alter table bys rename  &a  to &w,语法没错,但是 a,w 的值本身是否有问题 ?比如数字等等.
“直接修改其相对应的字段名”? 可以在循环内先给 a,w 赋值,再执行此句 alter .. ,试试。





星际花草
2016-01-25 19:22
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10607
专家分:43182
注 册:2014-5-20
收藏
得分:5 
回复 楼主 kaximoduo555
示例:
图片附件: 游客没有浏览图片的权限,请 登录注册

程序代码:
CREATE CURSOR tt (f1 I, f2 I)
INSERT INTO tt VALUES (1, 2)
? FIELD(1), FIELD(2)
a = "f2"
w = "ff2"
ALTER table tt rename (a) to (w)
? FIELD(1), FIELD(2)

of = CREATEOBJECT("form1")
of.show(1)

DEFINE CLASS form1 as Form
    Top = 100
    Left = 100
    
    ADD OBJECT Text1 as TextBox WITH top=10,left=10
    ADD OBJECT Text2 as TextBox WITH top=40,left=10
    
    PROCEDURE Init
        FOR i = 1 TO FCOUNT()
            sCmd = "thisform.Text"+TRANSFORM(i)+".Value = FIELD("+TRANSFORM(i)+")"
            _VFP.DoCmd(sCmd)
        ENDFOR
    ENDPROC
ENDDEFINE
2016-01-25 20:57
kaximoduo555
Rank: 1
等 级:新手上路
帖 子:21
专家分:0
注 册:2014-6-6
收藏
得分:0 
多谢,多谢!!! hepingfly,吹水佬
2016-01-25 21:12
kaximoduo555
Rank: 1
等 级:新手上路
帖 子:21
专家分:0
注 册:2014-6-6
收藏
得分:0 
回复 2楼 hepingfly
就是修改TEXT的内容!修改之后的内容就是新的字段名!比如说 之前读取出来的字段名显示在TEXT1中的是AAA  我把TEXT1改成AAB  那么之前表中的AAA字段名就变成AAB!
2016-01-25 21:17
liuxingang28
Rank: 11Rank: 11Rank: 11Rank: 11
来 自:山东济南
等 级:贵宾
威 望:47
帖 子:658
专家分:2180
注 册:2014-2-7
收藏
得分:5 
* 假设 text1 默认显示的是 field(1)
* 文本框中的内容必须满足系统对字段名的要求,比如:不能为空,必须以字母、下划线或汉字开头,中间不能有空格等
cOld = field(1)
cNew = allt(THISFORM.text1.Text)
alter table bys rename &cOld to &cNew

泉城飞狐
2016-01-26 08:41
taifu945
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:80
帖 子:1545
专家分:3298
注 册:2012-7-6
收藏
得分:5 
同意楼上的话,人工改字段名是需要按VFP要求进行查验的,如果不符合条件应该拒绝修改,要求重新录入新字段名。不能不经查验而直接修改,如果有不符合条件的名字,程序会崩溃。
2016-01-26 09:57
hepingfly
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:15
帖 子:195
专家分:657
注 册:2015-5-21
收藏
得分:0 
改表字段.zip (2.99 KB)

仅供参考的例子。

星际花草
2016-01-27 02:02
kaximoduo555
Rank: 1
等 级:新手上路
帖 子:21
专家分:0
注 册:2014-6-6
收藏
得分:0 
多谢各位帮忙!感激不尽!
2016-01-28 01:04
快速回复:帮个忙吧各位大侠
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.059190 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved