中国DOS联盟论坛

中国DOS联盟

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

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

游客:  注册 | 登录 | 命令行 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 请教各位: 如何编写一个 {一对七}生成的批处理!!!
作者:
标题: 请教各位: 如何编写一个 {一对七}生成的批处理!!! 上一主题 | 下一主题
balancel
初级用户





积分 26
发帖 11
注册 2008-9-26
状态 离线
『楼 主』:  请教各位: 如何编写一个 {一对七}生成的批处理!!! 使用 LLM 解释/回答一下

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)


望大侠们赐教!让大脑里的胶卷显显影!!!谢谢!!!


2009-4-2 05:35
查看资料  发短消息  网志   编辑帖子  回复  引用回复
netbenton
银牌会员

批处理编程迷


积分 1916
发帖 752
注册 2008-12-28
来自 广西
状态 离线
『第 2 楼』:   使用 LLM 解释/回答一下

@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 ]




精简
=> 个人网志
2009-4-2 07:35
查看资料  发送邮件  发短消息  网志  OICQ (37659560)  编辑帖子  回复  引用回复
tireless
银牌会员





积分 2025
发帖 1122
注册 2007-9-5
状态 离线
『第 3 楼』:   使用 LLM 解释/回答一下

@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


   此帖被 +2 点积分     点击查看详情   
评分人:【 netbenton 分数: +2  时间:2009-4-3 02:02


2009-4-2 08:19
查看资料  发短消息  网志   编辑帖子  回复  引用回复
balancel
初级用户





积分 26
发帖 11
注册 2008-9-26
状态 离线
『第 4 楼』:  谢谢两位! 使用 LLM 解释/回答一下

2楼 netbenton 我执行了没达到我要的效果,但谢谢!不久你将成为非常高手!
3楼 tireless 我只有感激和佩服!!!已修道成仙,闲时提着酒葫芦,拿着扇子,给需要的人点石成金!!!


2009-4-2 13:31
查看资料  发短消息  网志   编辑帖子  回复  引用回复
netbenton
银牌会员

批处理编程迷


积分 1916
发帖 752
注册 2008-12-28
来自 广西
状态 离线
『第 5 楼』:   使用 LLM 解释/回答一下

呵呵,lz真风趣,帮助他人就是在提高自己。




精简
=> 个人网志
2009-4-2 13:44
查看资料  发送邮件  发短消息  网志  OICQ (37659560)  编辑帖子  回复  引用回复
balancel
初级用户





积分 26
发帖 11
注册 2008-9-26
状态 离线
『第 6 楼』:   使用 LLM 解释/回答一下

呵呵,帮助他人可提高自己,可拔高他人!!!论坛上能应答的都是好样儿的!!!就是灌水那起码也能说明有发帖的冲动!高手不能默默无闻,那如果高手不帮助他人,谁会看见高手?有人提出问题,有人回答问题,有人求证对还是错,这才叫论坛嘛!!!哎呀妈呀........打了鸡血似的......再讲就成唐三藏咧!!!


   此帖被 +2 点积分    点击查看详情   
评分人:【 HAT 分数: +2  时间:2009-4-3 01:39


2009-4-2 22:00
查看资料  发短消息  网志   编辑帖子  回复  引用回复

请注意:您目前尚未注册或登录,请您注册登录以使用论坛的各项功能,例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转: