中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-08-11 13:43
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 请教各位: 如何编写一个 {一对七}生成的批处理!!! 查看 914 回复 5
楼 主 请教各位: 如何编写一个 {一对七}生成的批处理!!! 发表于 2009-04-02 05:35 ·  中国 广东 广州 荔湾区 电信
初级用户
积分 26
发帖 11
注册 2008-09-26 12:44
17年会员
UID 126684
性别 男
状态 离线
a.txt

7206010009 2
7205010005 2
7205010007 2
7205010011 2
7205010013 2
7205010017 2
7205010025 2


b.txt


1 C 粪便常规
2 C 乙型肝炎核心抗体测定(Anti-HBc)(酶标法)
3 C 乙型肝炎e抗体测定(Anti-HBe)(酶标法)
4 C 乙型肝炎表面抗体测定(Anti-HBs)(酶标法)
5 C 乙型肝炎表面抗原测定(HBsAg)(酶标法)
6 C 乙型肝炎e抗原测定(HBeAg)(酶标法)
7 C 尿液分析(仪器法,8-11)


要求生成,如下:
c.txt

7206010009 2 1 C 粪便常规
7206010009 2 2 C 乙型肝炎核心抗体测定(Anti-HBc)(酶标法)
7206010009 2 3 C 乙型肝炎e抗体测定(Anti-HBe)(酶标法)
7206010009 2 4 C 乙型肝炎表面抗体测定(Anti-HBs)(酶标法)
7206010009 2 5 C 乙型肝炎表面抗原测定(HBsAg)(酶标法)
7206010009 2 6 C 乙型肝炎e抗原测定(HBeAg)(酶标法)
7206010009 2 7 C 尿液分析(仪器法,8-11)

7205010005 2 1 C 粪便常规
7205010005 2 2 C 乙型肝炎核心抗体测定(Anti-HBc)(酶标法)
7205010005 2 3 C 乙型肝炎e抗体测定(Anti-HBe)(酶标法)
7205010005 2 4 C 乙型肝炎表面抗体测定(Anti-HBs)(酶标法)
7205010005 2 5 C 乙型肝炎表面抗原测定(HBsAg)(酶标法)
7205010005 2 6 C 乙型肝炎e抗原测定(HBeAg)(酶标法)
7205010005 2 7 C 尿液分析(仪器法,8-11)


望大侠们赐教!让大脑里的胶卷显显影!!!谢谢!!!
2 发表于 2009-04-02 07:35 ·  中国 广东 东莞 电信
银牌会员
★★★
批处理编程迷
积分 1,916
发帖 752
注册 2008-12-28 04:30
17年会员
UID 135147
性别 男
来自 广西
状态 离线
@echo off
(
for /f "tokens=*" %%a in (a.txt) do for /f "tokens=*" %%b in (b.txt) do echo %%a %%b
)>c.txt

改了一下,把单引号去掉了,可以运行了。
不过还是没有达到楼主的要求,三楼的很专业!

[ Last edited by netbenton on 2009-4-3 at 00:02 ]
精简
=> 个人网志
3 发表于 2009-04-02 08:19 ·  中国 江西 赣州 安远县 电信
银牌会员
★★★★
积分 2,025
发帖 1,122
注册 2007-09-05 20:15
18年会员
UID 96653
性别 男
状态 离线
@echo off&setlocal enabledelayedexpansion
for /f "tokens=1,2,*" %%a in (b.txt) do set %%a=%%a %%b %%c
(
for /f "tokens=1,2" %%a in (a.txt) do (
echo %%a %%b !1!
echo %%a %%b !2!
echo %%a %%b !3!
echo %%a %%b !4!
echo %%a %%b !5!
echo %%a %%b !6!
echo %%a %%b !7!
)
)>c.txt


或者:

@echo off
(
for /f "tokens=1,2" %%a in (a.txt) do (
for /f "tokens=1,2,*" %%i in (b.txt) do echo %%a %%b %%i %%j %%k
)
)>c.txt
本帖最近评分记录 (共 1 条) 点击查看详情
评分人分数时间
netbenton +2 2009-04-03 02:02
4 谢谢两位! 发表于 2009-04-02 13:31 ·  中国 广东 广州 白云区 电信
初级用户
积分 26
发帖 11
注册 2008-09-26 12:44
17年会员
UID 126684
性别 男
状态 离线
2楼 netbenton 我执行了没达到我要的效果,但谢谢!不久你将成为非常高手!
3楼 tireless 我只有感激和佩服!!!已修道成仙,闲时提着酒葫芦,拿着扇子,给需要的人点石成金!!!
5 发表于 2009-04-02 13:44 ·  中国 广东 东莞 电信
银牌会员
★★★
批处理编程迷
积分 1,916
发帖 752
注册 2008-12-28 04:30
17年会员
UID 135147
性别 男
来自 广西
状态 离线
呵呵,lz真风趣,帮助他人就是在提高自己。
精简
=> 个人网志
6 发表于 2009-04-02 22:00 ·  中国 广东 广州 白云区 电信
初级用户
积分 26
发帖 11
注册 2008-09-26 12:44
17年会员
UID 126684
性别 男
状态 离线
呵呵,帮助他人可提高自己,可拔高他人!!!论坛上能应答的都是好样儿的!!!就是灌水那起码也能说明有发帖的冲动!高手不能默默无闻,那如果高手不帮助他人,谁会看见高手?有人提出问题,有人回答问题,有人求证对还是错,这才叫论坛嘛!!!哎呀妈呀........打了鸡血似的......再讲就成唐三藏咧!!!
本帖最近评分记录 (共 1 条) 点击查看详情
评分人分数时间
HAT +2 2009-04-03 01:39
论坛跳转: