中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟
中国DOS联盟论坛
现在时间是 2026-08-03 18:15
48,038 主题排行 / 350,123 发帖 / 今日 0 篇 / 48,251 会员排行
DOS批处理 & 脚本技术(批处理室) » 如何以文件中的每个字为文件名和文件内容创建新文件
可打印版本  882 / 6
第1楼 zouzhxi 发表于 2007-03-18 10:50
中级用户 发帖 177 积分 430 来自 广东深圳
如何以文件中的每个字为文件名和文件内容创建新文件
我想问一下,,,问题是这个的....

我有一个文本文件(JT.TXT),,,里边有中文3千多字,,,可能包含有空格在里边,,,要把里边的文字以一个字为一个文件保存并且名字也是同一个字....(如:保存的是,它的文件名也是五.TXT内容也是五....)

怎么样来实现它...不懂...特来请教...



啊阿埃挨哎唉哀皑癌蔼矮艾碍爱隘鞍氨安俺按暗岸胺案肮昂盎凹敖熬翱袄傲奥懊澳芭捌扒叭吧笆八疤巴拔跋靶把耙坝霸罢爸白柏百摆佰败拜稗斑班搬扳般颁板版扮拌伴瓣半办绊邦帮梆榜膀绑棒磅蚌镑傍谤苞胞包褒剥薄雹保堡饱宝抱报暴豹鲍爆杯碑悲卑北辈背贝钡倍狈备惫焙被奔苯本笨崩绷甭泵蹦迸逼鼻比鄙笔彼碧蓖蔽毕毙毖币庇痹闭敝弊必辟壁臂避陛鞭边编贬扁便变卞辨辩辫遍标彪膘表鳖憋别瘪彬斌濒滨宾摈兵冰柄丙秉饼炳病并玻菠播拨钵波博勃搏铂箔伯帛舶脖膊渤泊驳捕卜哺补埠不布步簿部怖擦猜裁材才财睬踩采彩菜蔡餐参蚕残惭惨灿苍舱仓沧藏操糙槽曹草厕策侧册测层蹭插叉茬茶查碴搽察岔差诧拆柴豺搀掺蝉馋谗缠铲产阐颤昌猖场尝常长偿肠厂敞畅唱倡超抄钞朝嘲潮巢吵炒车扯撤掣彻澈郴臣辰尘晨忱沉陈趁衬撑称城橙成呈乘程惩澄诚承逞骋秤吃痴持匙池迟弛驰耻齿侈尺赤翅斥炽充冲虫崇宠抽酬畴踌稠愁筹仇绸瞅丑臭初出橱厨躇锄雏滁除楚础储矗搐触处揣川穿椽传船喘串疮窗幢床闯创吹炊捶锤垂春椿醇唇淳纯蠢戳绰疵茨磁雌辞慈瓷词此刺赐次聪葱囱匆从丛凑粗醋簇促蹿篡窜摧崔催脆瘁粹淬翠村存寸磋撮搓措挫错搭达答瘩打大呆歹傣戴带殆代贷袋待逮怠耽担丹单郸掸胆旦氮但惮淡诞弹蛋当挡党荡档刀捣蹈倒岛祷导到稻悼道盗德得的蹬灯登等瞪凳邓堤低滴迪敌笛狄涤翟嫡抵底地蒂第帝弟递缔颠掂滇碘点典靛垫电佃甸


[ Last edited by namejm on 2007-3-20 at 12:55 PM ]
第2楼 slore 发表于 2007-03-18 11:32
铂金会员 发帖 2,478 积分 5,212
建议用vbs...

for mid len
第3楼 xycoordinate 发表于 2007-03-18 11:48
中级用户 发帖 228 积分 493 来自 安徽
test.bat


@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 ]
第4楼 vkill 发表于 2007-03-19 07:10
金牌会员 发帖 1,744 积分 4,103 来自 甘肃.临泽
要我我用sed
第5楼 zouzhxi 发表于 2007-03-19 08:45
中级用户 发帖 177 积分 430 来自 广东深圳
RE 3楼:

好像只能实现512字...剩下的就不行了...呵.///谢了.
第6楼 lxmxn 发表于 2007-03-19 09:18
版主 发帖 4,938 积分 11,386

  如果这文本没有换行的话,用bat不要处理,建议用sed或者vbs。
第7楼 jmz573515 发表于 2007-03-19 10:05
银牌会员 发帖 464 积分 1,212
好像以前有人问过类似的问题,找一下...
[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023