[local]1[/local]

格式
20130304|！张三|！某小区A|207
20130404|！李四|！某小区A|208
20130704|！张三|！某小区A|209

我从来是要真实的数据，要有足够的样本。不带玩假的，到真实环境出现意外等于白弄。

解决问题，就要以诚待人。

要你真实的东西，不是好奇私密，而是为了给你彻底地解决问题，不是就题做题，省得过后出现新问题再求救。有时，别人给的解决方案是考虑了很多你没考虑到的东西的，不要以为给你解了燃眉之急就了事，以为人家的方案太复杂，总去求一条指令，那不是能事。

[ 本帖最后由 TonyDeng 于 2014-6-11 13:28 编辑 ]

不好意思，单位内部资料，文件无法拷贝至外网，所以编制格式上传，真的不是故意的，文本就是以"|！"分隔

前面拍了一张图片，就是传不上来

把 |！ 替换为Chr(9)

StrToFile(Strtran(FileToStr("A.Txt"),"|！",Chr(9)),"A.Txt")
Append From A.Txt Delimited With Tab

[ 本帖最后由 sdta 于 2014-6-11 16:26 编辑 ]

非常感谢，在家测试成功，明天到单位试试大文件，有100多万条记录，不知替换快不快。

如果数据量大，先转换到临时表中，在表中修改速度快。

Create Cursor T (Nr C(200),Ta C(50),Tb C(50),Tc C(50))
Append From A2.Txt Sdf 
Replace All Nr With Strtran(Nr,"！",""),Ta With Getwordnum(Nr,1,"|"),Tb With Getwordnum(Nr,2,"|"),Tc With Getwordnum(Nr,3,"|")
Alter Table T Drop Nr
Browse 

[ 本帖最后由 sdta 于 2014-6-11 22:59 编辑 ]