从上传的四条数据来看,还是有规律的。										
					
	
	
	
			
坚守VFP最后的阵地
 全国省市县列表完整版.zip
				(19.85 KB)
全国省市县列表完整版.zip
				(19.85 KB)
				
				
			 程序代码:
程序代码:close databases
create cursor dz (处理前 c(120),处理后 c(140))
append from 测试 fields 处理前
use 全国 in 0 alias qg
select qg
scan 
    sf=alltrim(省份)
    sj=alltrim(市级)
    select dz
    cstr=""
    scan
        do case
            case occurs(sj,处理前)=2
                n=atc(sj,处理前,2)
                cstr=sf+sj+substr(处理前,n+len(sj))
            case occurs(sj,处理前)=1
                n=atc(sj,处理前)
                cstr=sf+sj+substr(处理前,n+len(sj))
        endcase
        if sj$处理前
            replace 处理后 with cstr
        endif 
    endscan
endscan
select dz
browse 测试.rar
				(17.96 KB)
测试.rar
				(17.96 KB)
				
				
			