| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 4343 人关注过本帖
标题:如何取得字段的宽度并重新设置其宽度?
只看楼主 加入收藏
yang725
Rank: 3Rank: 3
等 级:论坛游侠
帖 子:53
专家分:123
注 册:2009-3-12
收藏
得分:0 
因为过去每年都要建立这样一套表,其中就包含kmmck.dbf表,并且很多基层单位都用这套表,现在我在程序中把处理该表kmx1字段宽度的部分改成16(过去是10),如果我把每套表中的该字段的宽度一一修改(包含基层单位)那显然太麻烦,所以我就想在程序中对该字段宽度进行修改,每次打开该表时检查kmx1字段宽度是否为16,否则就重新设置为16。
2014-07-10 10:38
tlliqi
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:204
帖 子:15453
专家分:65956
注 册:2006-4-27
收藏
得分:3 
ALTER TABLE 表名 ALTER KMX1 N(16,0) 0代表小数位数
2014-07-10 10:39
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9847
专家分:27234
注 册:2012-2-5
收藏
得分:0 
网络上修改字段宽度?

坚守VFP最后的阵地
2014-07-10 10:48
yang725
Rank: 3Rank: 3
等 级:论坛游侠
帖 子:53
专家分:123
注 册:2009-3-12
收藏
得分:0 
回复 8 楼 sdta
因为每年都要建立一套表,其中就包含kmmck.dbf(包刮很多基层单位也用),由于我把程序中处理kmx1字段宽度的部分改成16(过去是10),如果把该表一一修改那显然太麻烦,所以我想在程序中每次打开该表时就检查kmx1字段的宽度,如果不是16则重新设置为16。kmx1字段没有小数位。
2014-07-10 10:56
yang725
Rank: 3Rank: 3
等 级:论坛游侠
帖 子:53
专家分:123
注 册:2009-3-12
收藏
得分:0 
因为过去每年都要建立这样一套表,其中就包含kmmck.dbf表,并且很多基层单位都用这套表,现在我在程序中把处理该表kmx1字段宽度的部分改成16(过去是10),如果我把每套表中的该字段的宽度一一修改(包含基层单位)那显然太麻烦,所以我就想在程序中对该字段宽度进行修改,每次打开该表时检查kmx1字段宽度是否为16,否则就重新设置为16。
2014-07-10 10:59
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9847
专家分:27234
注 册:2012-2-5
收藏
得分:0 
程序代码:
UseIf Type("表.Kmx1")!="U" And Type("表.Kmx1")="N"
   If Iif(Afields(A)>0,A(Ascan(A,"KMX1")+2),0)!=16 && 字段名如果是英文,一定要大写
      Alter TableAlter Kmx1 N(16)
      Modify Structure
   Endif
Endif

坚守VFP最后的阵地
2014-07-10 11:04
wengjl
Rank: 14Rank: 14Rank: 14Rank: 14
等 级:贵宾
威 望:109
帖 子:2224
专家分:3903
注 册:2007-4-27
收藏
得分:0 
感觉手工能解决的东东,程序都能解决哦。

只求每天有一丁点儿的进步就可以了
2014-07-10 11:05
liuxingang28
Rank: 11Rank: 11Rank: 11Rank: 11
来 自:山东济南
等 级:贵宾
威 望:47
帖 子:658
专家分:2180
注 册:2014-2-7
收藏(1)
得分:10 
use 表 excl
if fsize('字段') < 16
    alter table 表 alter 字段 n(16)
endif

泉城飞狐
2014-07-10 11:13
yang725
Rank: 3Rank: 3
等 级:论坛游侠
帖 子:53
专家分:123
注 册:2009-3-12
收藏
得分:0 
liuxingang28 版主的方法解决了问题,谢谢!
2014-07-11 10:16
快速回复:如何取得字段的宽度并重新设置其宽度?
数据加载中...
 
   



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

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