怎么修改FoxPro的一个字段的值

这里有一张RC000.dbf的表，有关键字段keymain,它的值是abcdef，字段的长度7位，我需要插入一个字母e到第5位，使字段变成abcdeef，用VFoxPro怎么实现，谢谢。

11 个解决方案

#1

你的表里就只有一条记录吗？如果那样就简单了：
Use RC000
REPLACE keymain WITH "abcdeef" RECORD 1
Use In RC000

#2

是有一万多条，你看怎么写？谢谢！
并且不知道下一条的具体字母，只要求插一个字母到第5位。

#3

都是插入字母e，还是插入与原记录字段的第五个相同的字母？

#4

都是插e，只管第5位就行了。

#5

Use RC000 
M=RECCOUNT()
For I=1 To M
REPLACE keymain WITH LEFT(keymain,5)+"e"+RIGHT(keymain,1) RECORD I
EndFor 
Use In RC000

#6

刚才写错位了，不好意思。加到第五位应该是

Use RC000 
M=RECCOUNT() 
For I=1 To M 
REPLACE keymain WITH LEFT(keymain,4)+"e"+RIGHT(keymain,2) RECORD I 
EndFor 
Use In RC000

#7

Use RC000 
For I=1 To RECCOUNT() 
   REPLACE keymain WITH SUBSTRC(keymain,1,4)+"e"+SUBSTRC(keymain,5) 
EndFor 
Use In RC000

#8

Use RC000 
REPLACE ALL keymain WITH LEFT(keymain,4)+"e"+RIGHT(keymain,LEN(keymain)-4) 
Use In RC000

#9

Use RC000 
REPLACE ALL keymain WITH LEFT(keymain,4)+"e"+RIGHT(keymain,LEN(keymain)-4) 
Use In RC000

#10

同意楼上：
Use RC000 
REPLACE ALL keymain WITH LEFT(keymain,4)+"e"+RIGHT(keymain,LEN(keymain)-4) 
Use In RC000

不过，如果原字段都是六位的话，LEN(keymain)-4没什么必要，直接用2就可以。

#11

Update RC000 Set keymain=Left(Rtrim(keymain),4)+'e'+Substr(Rtrim(keymain),5)