foxpro中如何批量替换

方法一：

在(总表)零售价修改的地方增加一个判断，调用一个自定义函数。调用的时候把参数spbm和lsj传递过去，就可以在修改(总表)价格的时候修改(价格表)中对应的价格了。

提前把价格建立复合索引：

index on spbm tag ispbm

自定义函数的写法：

Para mSpbm,mlsj

if !Used('价格')

Use 价格 in 0

endif

Sele 价格

Set order to ispbm

if seek(m.mspbm)

replace lsj with m.mlsj

else

wait'这个编码没有在价格表中找到!!!' windows

endif

return

当然，总表和价格表反过来查，做法相同。

方法二：

全部修改完价格以后再替换：

if !Used('价格')

Use 价格 in 0

endif

Sele 价格

Set order to ispbm

if !Used('总表')

Use 总表 in 0

endif

Sele 总表

Scan

Sele 价格

if seek(m.mspbm)

replace lsj with m.mlsj

else

?spbm,'这个编码没有在价格表中找到!!!'

endif

endscan

return

这是vf的表，里面应该是数据资料，下载visual foxpro 6，或者更高版本安装，即可关联此文件，打开就行了。

你说你的vf写的软件运行不了？不知你的软件是vf哪个版本写的，如果你机器里没有装vf，需vf运行库文件支持。

browse是浏览表,但也可直接修改数据.browse命令很多

我真不知道你想干什么,一个data.dbf表,是不是让你编程啊

要是编写软件应该不是很困难,不过不会vf的太难了.

如果上手vf,一个月应该能 *** 作数据.

这个很简单啊,用索引和排序就可以了.

或者用程序语句,比如scan...endscan 等 等位语句locate for等,browse for 等.....

或者用物理排序sort to a on ...for...生成一个dbf.

---