标题: 如何以文件中的每个字为文件名和文件内容创建新文件
[打印本页]
作者: zouzhxi
时间: 2007-3-18 10:50
标题: 如何以文件中的每个字为文件名和文件内容创建新文件
我想问一下,,,问题是这个的....
我有一个文本文件(JT.TXT),,,里边有中文3千多字,,,可能包含有空格在里边,,,要把里边的文字以一个字为一个文件保存并且名字也是同一个字....(如:保存的是[五],它的文件名也是五.TXT内容也是五....)
怎么样来实现它...不懂...特来请教...
| Quote: |
| 啊阿埃挨哎唉哀皑癌蔼矮艾碍爱隘鞍氨安俺按暗岸胺案肮昂盎凹敖熬翱袄傲奥懊澳芭捌扒叭吧笆八疤巴拔跋靶把耙坝霸罢爸白柏百摆佰败拜稗斑班搬扳般颁板版扮拌伴瓣半办绊邦帮梆榜膀绑棒磅蚌镑傍谤苞胞包褒剥薄雹保堡饱宝抱报暴豹鲍爆杯碑悲卑北辈背贝钡倍狈备惫焙被奔苯本笨崩绷甭泵蹦迸逼鼻比鄙笔彼碧蓖蔽毕毙毖币庇痹闭敝弊必辟壁臂避陛鞭边编贬扁便变卞辨辩辫遍标彪膘表鳖憋别瘪彬斌濒滨宾摈兵冰柄丙秉饼炳病并玻菠播拨钵波博勃搏铂箔伯帛舶脖膊渤泊驳捕卜哺补埠不布步簿部怖擦猜裁材才财睬踩采彩菜蔡餐参蚕残惭惨灿苍舱仓沧藏操糙槽曹草厕策侧册测层蹭插叉茬茶查碴搽察岔差诧拆柴豺搀掺蝉馋谗缠铲产阐颤昌猖场尝常长偿肠厂敞畅唱倡超抄钞朝嘲潮巢吵炒车扯撤掣彻澈郴臣辰尘晨忱沉陈趁衬撑称城橙成呈乘程惩澄诚承逞骋秤吃痴持匙池迟弛驰耻齿侈尺赤翅斥炽充冲虫崇宠抽酬畴踌稠愁筹仇绸瞅丑臭初出橱厨躇锄雏滁除楚础储矗搐触处揣川穿椽传船喘串疮窗幢床闯创吹炊捶锤垂春椿醇唇淳纯蠢戳绰疵茨磁雌辞慈瓷词此刺赐次聪葱囱匆从丛凑粗醋簇促蹿篡窜摧崔催脆瘁粹淬翠村存寸磋撮搓措挫错搭达答瘩打大呆歹傣戴带殆代贷袋待逮怠耽担丹单郸掸胆旦氮但惮淡诞弹蛋当挡党荡档刀捣蹈倒岛祷导到稻悼道盗德得的蹬灯登等瞪凳邓堤低滴迪敌笛狄涤翟嫡抵底地蒂第帝弟递缔颠掂滇碘点典靛垫电佃甸 |
|
[
Last edited by namejm on 2007-3-20 at 12:55 PM ]
作者: slore
时间: 2007-3-18 11:32
建议用vbs...
for mid len
作者: xycoordinate
时间: 2007-3-18 11:48
test.bat
| Quote: |
@echo off
setlocal enabledelayedexpansion
set /p var=<%1
set i=0
:loop
if "%var%"=="" (
::求文本长度
echo %i%
goto jt
)
set var=%var:~0,-1%
set /a i+=1
goto loop
:jt
set /a j=i-1
for /l %%a in (0,1,%j%) do (
for /f "delims=" %%I in (%1) do (
set str=%%I
set xxxx=!str:~%%a,1!
::排除空格
if not "!xxxx!"==" " echo !xxxx! >!xxxx!.txt
)
)
:eof |
|
CMD:
test.bat jt.txt
[
Last edited by xycoordinate on 2007-3-17 at 10:56 PM ]
作者: vkill
时间: 2007-3-19 07:10
要我我用sed
作者: zouzhxi
时间: 2007-3-19 08:45
RE 3楼:
好像只能实现512字...剩下的就不行了...呵.///谢了.
作者: lxmxn
时间: 2007-3-19 09:18
如果这文本没有换行的话，用bat不要处理，建议用sed或者vbs。
作者: jmz573515
时间: 2007-3-19 10:05
好像以前有人问过类似的问题，找一下...