用FIELD函数判断。

select 表1
if field(1)="序号"
scan
replace 序号 with 工号
endscan
endif

你可能误解楼主的意思了，楼主的意思是修改表结构中的字段名

好像是这么个意思，你说得对。
那下面代码行不？楼主先试试。
select  表一
if field(1)="序号"
ALTER table 表1 alter 序号 rename 工号
endif

楼主两个表中的工号与序号字段的结构是一样的，内容也是一样的，只是楼主不会用条件连接进行数据替换。

楼主的问题曾经折磨过我，现在把我的经历告诉你，也许会帮到你。

当时我手上两个表，A表的字段是:单位代码 （字符型，字段长度8，实际只使用6位数代码），单位名称，订单号，

B表的字段是客户代码 （字符型，长度6，实际使用也是6），客户地址，客户联系人，发票抬头，
要把B表里的客户地址，发票抬头 加到A表中有相同客户代码的记录中去，当时直接用“SET RELATION TO ”在A、B表间建立关联。
但是程序运行完毕后，发现A表的记录根本没有更新，同时程序也不会报错，编译通过的。
查错，各种折磨......
后来发现，“SET RELATION TO ”表面上成功了，程序也不会报错，但其实附表根本不会随主表联动，如果在“SET RELATION TO ”之前，先把A表的单位代码的字段长度缩小为6，再用“SET RELATION TO ”，就成功了。这个错误很折磨的人的原因在于，他不会报错，不仔细检查发现不了。

收到的鲜花

• tlliqi 于 2013-04-02 00:42 送鲜花  10朵   附言：谢谢分享

相同内容的字段，字段名不一致无所谓，关键是字段类型和长度必须一致，否则无法关联的。

哦？我原来觉得只要字段类型一致就行，字段宽度也要设一致吗？偶测试下

回13楼,月沐庭轩
select  表一
if field(1)="序号"
ALTER table 表1 alter 序号 rename 工号
endif
请问 field(1)="序号" 其中的1,假如不知道序号字段在第几位就不一定用1表示又该如何是好?
回2楼,tlliqi
我在PRG中用你方法加上一句命令行,试用过能解决问题.谢谢
同时谢谢楼上各位热心人.

问题看来是解决了

月沐庭轩
select  表一
if field(1)="序号"
ALTER table 表1 alter 序号 rename 工号
endif
请问 field(1)="序号" 其中的1,假如不知道序号字段在第几位就不一定用1表示又该如何是好?