标题:想起一个问题问问大家
只看楼主
不懂就问呗
Rank: 2
来 自:遥远的回忆
等 级:论坛游民
帖 子:51
专家分:13
注 册:2007-12-16
得分:0 
编完了,不带自己藏着的,发上来,让我也学习学习

根据自己问题自定义版的 STRTOFILE 

说不定哪天我也会用到呢,省了到处求教了
2007-12-29 12:01
baichuan
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:37
帖 子:953
专家分:589
注 册:2006-3-13
得分:0 
我现在做的是把文本按字符型导入DBF,然后判断",",接着就是替换,然后前面加空格,很麻烦啊!
需要提前知道","在哪一位了才行!

2008-01-08 08:05
Tiger5392
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:88
帖 子:2775
专家分:2237
注 册:2006-5-17
得分:0 
不用事先知道逗号在哪里,函数chrtran()直接替换。

感言:学以致用。 博客:http://www./blog/user14/65009/index.shtml email:Tiger5392@
2008-01-08 15:24
baichuan
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:37
帖 子:953
专家分:589
注 册:2006-3-13
得分:0 
老虎啊,不是和你说了你那么替换之后,就会导致字符窜位了!
嘿嘿!
俺下午冥思苦想出来,做了个函数!就可以了!
嘿嘿!

2008-01-08 17:02
Tiger5392
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:88
帖 子:2775
专家分:2237
注 册:2006-5-17
得分:0 
*!*    以下是 test2.txt 文件的内容。每14个字符为1个数据,每行3个数据为1个记录,共3个记录
*!*            123.00    123,456.78  1,234,567.89
*!*    123,456,789.01123,456,789.01123,456,789.01
*!*    111,222,333.44555,666,777.88999,000,111.22

*!*    以下是将 test2.txt 文件的内容转换到 test2.dbf 文件的程序
CLEAR
CREATE CURSOR test2 (sl1 c(14),sl2 c(14),sl3 c(14))
APPEND FROM test2 SDF &&以字符方式转换到 test2.dbf 文件
LIST
*!*    以下是显示的结果
*!*       记录号  SL1                   SL2                   SL3                  
*!*            1          123.00            123,456.78          1,234,567.89      
*!*            2  123,456,789.01        123,456,789.01        123,456,789.01      
*!*            3  111,222,333.44        555,666,777.88        999,000,111.22      

UPDATE test2 SET sl1=CHRTRAN(sl1,',',''),;
                 sl2=CHRTRAN(sl2,',',''),;
                 sl3=CHRTRAN(sl3,',','')  &&将每个字符型数据的逗号去掉
LIST
*!*    以下是显示的结果
*!*       记录号  SL1                   SL2                   SL3                  
*!*            1          123.00            123456.78           1234567.89         
*!*            2  123456789.01          123456789.01          123456789.01         
*!*            3  111222333.44          555666777.88          999000111.22         

ALTER TABLE test2 ALTER sl1 N(14,2)  &&修改字段的数据类型为 数值型
ALTER TABLE test2 ALTER sl2 N(14,2)
ALTER TABLE test2 ALTER sl3 N(14,2)
LIST
*!*    以下是显示的结果
*!*       记录号                    SL1                   SL2                   SL3
*!*            1                 123.00             123456.78            1234567.89
*!*            2           123456789.01          123456789.01          123456789.01
*!*            3           111222333.44          555666777.88          999000111.22

[[italic] 本帖最后由 Tiger5392 于 2008-1-8 22:55 编辑 [/italic]]

test2.JPG (20.83 KB)

感言:学以致用。 博客:http://www./blog/user14/65009/index.shtml email:Tiger5392@
2008-01-08 22:49
baichuan
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:37
帖 子:953
专家分:589
注 册:2006-3-13
得分:0 
哦!谢谢大老虎了!

这样转换应该是可以的了!

嘿嘿!

可是俺觉得俺做了个小函数,感觉还是很好用的哦!哈哈!

2008-01-09 07:51
ibukick
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2006-8-16
得分:0 
真累.不如用word打开全部替换掉再转成txt算了
2008-01-11 09:33



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-192368-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.375561 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved